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EDITORIAL JOTTINGS 


Since the start of Volume 4 of BEEBUG, we have made some 
changes to the layout and presentation of articles and programs 
in the magazine. One of the consequences of this is that our 
standard column width is now 42 characters. We have taken 
advantage of this to list all our programs in a 40 column width. 
This means that when you enter a program listed in the 
magazine into your Beeb, and then list it in 40 column mode on 
the screen, all the line breaks should match up exactly with the 
magazine listing, making checking and location of any typing 
errors much easier. 

There are two points to note. All our programs are listed in 
the magazine with a LISTO1 format, and a program must be 
listed in this format on the screen if it is to match up. The other 
consequence of this approach is that you will find several 
instances in most programs where the end of a line of Basic 
overlaps onto the next physical line by a single character, which 
is only too easily missed. We could avoid this, as we used to do 
previously, but only by dropping a strict adherence to the 40 
column format. We believe this small cost is worthwhile. 


Fourth Demonstration 

Pursuing our policy of providing more special offers on 
selected hardware and softw we are now able to offer 
Oxford Pascal ( reviewed BEEBUG Vol. 4 No.3) at a discount to 
members. With the success of Wordwise Plus, BEEBUGSOFT 
have released a new complementary product called ‘Wordease’ 
which provides 15 powerful and useful utilities to enhance the 
use of Wordwise Plus. Details of both these items, and other 
offers to members, are included with this issue 
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This month's magazine cassette/disc contains three extra 
items. There is the revised version of the Polar Curves program 
first published in BEEBUG Vol. 4 No. 1 and referred to in this 
month's BEEBUG Workshop. Following the Extended 65C02 
Assembler featured in the same recent issue, we are now 
included a disassembler (by Nick Hudson) which also handles 
the full 65C02 instruction set. Thirdly, we have put in a full- 

feature machine code game by P. Oliver, called Rescue Mission. 
5 5 See the back cover for details of this and all the other programs. 
e Е We have decided this month to award three prizes of £10 for 
CHART? B the hints by Douglas Siviter, Richard Sterry and Dave Brincombe 
Ive We always welcome your hints and tips, so keep them coming. 
DEMO $ 
BOB s 


тек PROGRAM CLASSIFICATION 
алын Š All programs in the magazine, and on the magazine cassette/ 
PROG2 Е disc, are marked with the symbols shown below. An uncrossed 
IRE B symbol indicates full working, a single line through a symbol 
пе shows partial working (normally some modifications will be 
required), and a cross through a symbol indicates a program 
that will not work on that system. We also have a symbol for the 


recent model В+ 


Basic 1 T Electron ©) 
Basic II II Disc n 
Tube a Cassette Lome 
Model B+ 4 


ГА 
c 
Я 
y 
s 
8 
E 
с. 
Ф 
ap 
с 
2 
8 
с 
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Catalogue 


Disc C 


POSTBAG 


A.M 


DOMESTIC ACCOUNTS DATED |), his is compensated 


I have modified tne 
Domestic Accounts program 
(BEEBUG Vol.2 Мо.10, Vol.3 


No.6) so that different 
dates can be saved with 
the file (lines 2651 and 


2652). I have also taken 
the opportunity to improve 
(in my view) the presenta- 
tion of data. 


200 IF R=65 CLEAR:R-0:DIM 
BCF% (13) :pad$=" = = ";P 
ROC load: PROCmonths 
2110 OPNBAL-0:pad$-" - 
= w" 

2720 MONS (1%)=" 

": NEXT 
3880 READ AS:PRINT AŠ: 


="4AS+"= 


2651 PROCcolours 
2652 PROCdate 


These changes make the 
presentation more readable 
and ensure the correct 
date goes on the file 

Ian Kidd 


LEAP OF THE CENTURY 

I read with interest 
the article and subsequent 
letters on the calendar 
program (BEEBUG Vol.3 
No.7). I thought to myself 
"It isn't going to work 
because century years are 
NOT leap years." Before 
writing to you I decided 
to check my facts......and 
all is well! 


A year is actually 
365.2425 days (1460.97 
after 4 years). А year 
with leap-year compensa- 
tion is actually 365.25 
days (1461 after 4 years. 
This is still 0.03 days 


out! After 400 years the 
figures are 146097 and 
146100; 3 years out exact- 
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for by making all century 
years that are NOT divis- 
ible by 400 into non leap 
years. Thus 1600 was a 
leap year but 1700, 1800 
and 1900 were not. I have 
used the term 'century' 
for convenience, but I 
would comment that the 
year 2000 is not the start 
of a new century as many 
ignoramuses (ignorami?) 
would have us believe. 
Stephen Kirby 


SHEILA IN TROUBLE 
While trying to inter- 


face a number of Beeb's 
together using a program 
that directly addresses 


&FE@8, 9 and 10 (SHEILA), 
one of my friend's comput- 
ers would not work. On 
investigating it was found 
that his IC7 interface 
chip was different. In- 
stead of a Ferranti 2C199 
it was а 'special' Acorn 
chip. These, I understand, 
were installed in a number 
of Beebs about 18 months 
ago. Changing the bad chip 
then allowed direct and 
correct access to SHEILA. 
B.D.Cocksedge 


Acorn acknowledges that 
there are two sources of 
the chip in question and 
that in certain circum- 
stances they may behave 
differently. | For 85423 
working, bits 3, 4 and 5 
of the control register in 
the Serial Processor IC 
are set to the receive 


baud rate. This may be 
done using *FX7,X. For 
cassette working these 


three bits should be set 
to zero, as the Serial 
Processor does this auto- 
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matically. If  *FX7 is 
used, incorrectly, to set 
the receive baud rate in 
these circumstances, the 
function of the Serial 
Processor is undefined and 
the two versions behave 
differently. Acorn recomm- 
ends that software written 
to replace the CFS (and 
directly access the rele- 
vant SHEILA locations) 
should always set these 
serial bits to zero, which 
may be done using *FX7,8. 


PROCEEDING DYNAMICALLY 


The program for dynamic 
loading of functions and 
procedures  (BEEBUG Vol.3 
No.2) allows you to 
Squeeze bigger programs 
into the Beeb's limited 
memory. Recently I used 
the technique to support a 
program with а dozen 
overlays. In doing this I 
discovered that it was 
still possible to obtain 
the very "Мо Room' error 
that the program was 
designed to avoid. This 
can be corrected by adding 


2275 AND #&7F \Remove ‘hid 
ding’ bit 


Once this is added, two or 

more overlays пау be 

swapped indefinitely. 
Chris Reynolds 


We have checked this out 
and it works. In fact, it 
would appear that this 
line was accidently left 
out of the original 
program at some stage. 
This very useful program 
is also part of Discmaster 
produced by BEEBUGSOFT, 
and this amendment applies 
also to that version. 
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LOGO GOES ON 

Logo Software Ltd. has 
issued a version of its 
Logo (reviewed Vol.3 No.1@) 
for Econet systems. There 
is a licence fee of £49 per 
network and manuals cost 
£15 each. Minimum package 
is a licence and four 
manuals at £100. LSL is on 
01-891 9989. 


Meanwhile, Logotron has 
released its promised 
sprite board for £179.95. 
The Advanced Logo to make 
use of the sprite board and 
provide a host of other 
goodies (control Logo and 
more primitives) costs £15. 
Unfortunately the board is 
only controllable from Logo 
at present though plans are 
under way to produce some 
Basic control. There are 
plans also to produce some 
Logo applications software 
before the end of the year. 


This will include a 
spreadsheet and a maze- 
solving program. Logotron 
is on 01-352 1988. 
TOOLBOX 2 

Members with old Beebs 
and long memories will 
remember BBC Soft's early 


release, '"Toolbox'. A 
follow up package called 
(none too originally) 
Toolbox 2 is now available. 
Like the first, Toolbox 2 
contains a whole host of 
utility programs to help 
you with Basic, assembler, 
graphics, filing, and other 
bits and bobs. All the 
programs can be used on 
their own or as subroutines 
in your own works. Toolbox 
2 cost £9.95 for the tape 
and £10.95 for the 
accompanying book. Details 
from BBC Soft on 61-927 
4518. 


AU 


PLAY IT AGAIN ROM 

LVL's musical keyboard 
for the Beeb has gained 
some new ROM driving 
software. The Echo keyboard 
is a 36 note miniature 
keyboard that connects to 
the User Port. The Echo ROM 
provides a music 'language' 
enabling you to store and 
recall played pieces and 
alter the envelopes, etc. 
of the sounds. The Echo ROM 
costs £29.95 from LVL on 
0602-394000. 


LOOKING AHEAD 


Operation Caretaker is 
the unlikely name for a 
useful package for cassette 
users from Global Software. 
The package comprises both 
a cassette head cleaner and 
demagnetizer, and another 
tape containing a program 
to help you align your 
heads correctly! £10.95 
will buy you the two tapes 
complete with a screwdriver 


News News News News News News ...... 


to do all 
Details from 
01-223 1369. 


the adjusting. 
Global on 


TWO-DISC ADVENTURE 


Following Acornsoft's 
'Acheton', Robico Software 
has produced а text-only 
adventure on two discs. 
With over 450 locations and 
long, 'atmospheric' des- 
criptions, '‘Enthar Seven' 
contains around 150K of 
text compressed onto the 
disc. The game has a 
science fiction setting and 
costs £17.95 from Robico on 
0443-227354. 


PIE IN THE SKY 

If you're looking for a 
iore unusual use for your 
Beeb, what better than a 
satellite tracking program. 
AMSAT-UK have the goods in 
the form of Satpak. This 
package will. help you 
predict satellite orbits 
and decode, display, and 
correlate data from the 
University of Surrey's 
amateur satellite. Further 


details from AMSAT-UK, 94 
Herongate Road, Wanstead 
Park, №12 5EQ. ses] 


POLAR COMPETITION RESULTS 


The Polar Curves 
competition prompted a good 
response from readers  vith 
many clever and original 
polar curve equations 
entered. However, the 
winner was selected as M. 
Jan Plaisier of Belgium for 
his arrows design. M. 
Plaisier's winning equation 
is remarkably simple: 


SQR (ABS (TAN (theta*2) ) ) AND-1 


with a size of 209. The 
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result is shown below. £50 
will soon be winging its 
way to Mr. Plaisier. 


O* LINKS 


DUAL FORMAT UTILITY 


With two standards of disc drive 
(40 and 80 track) in use with the 
Beeb, creating a disc readable 
by both can only be useful. Steve 
Turnbull reveals the secrets 
involved and describes his 
simple-to-use 40/80 formatter. 


Although .a BBC micro with a disc drive 
is a powerful combination, problems can 
arise with the existence of both 40 and 80 
track discs as these are not interchange- 


able. You may have trouble swapping 
software with your friends or at the local 
computer club, and software houses 
certainly don't  relish producing two 


different disc versions of every program. 


It is possible to purchase switchable 
40/80 drives (at extra cost), and some 
(non Acorn) DFS ROMs can read both 40 and 
80 track discs on an 80 track drive. Even 


so, many readers are likely to be limited 
to using just one standard of disc. 
The solution is to use a 'dual- 


formatted' disc which can be read by both 
40 and 80 track drives. The 40/80 utility 
described here will enable you to do just 
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that, producing а dual 40/80 track disc. 
To use this utility you must have ап 80 
track drive, or a 40/80 switchable drive, 
(or both a 48 and an 80 track drive). 


BASIC PRINCIPLES 

It is possible to format an 80 track 
disc, partly as a 40 track disc and partly 
as an 80 track disc, with a common 
directory. The two areas cannot be 
interleaved which reduces the usable area, 
but with some judicious programming we can 
provide approximately 64K in each mode. 


FORMATTING 40/80 DISCS 


Load and run the program listed here, 
though make sure you have a copy safely 
Stored away first. As soon as the 40/80 
program is loaded, make sure you remove 
from the drive the disc on which it was 
Stored. Now proceed as follows: 


1. As prompted, specify the drives to be 
used for formatting at 40 and 80 tracks. 
If you only have an 80 track drive answer 
the same for both questions (the program 
automatically 'double steps' when creating 
the 40 track section). 


2. Insert the disc to be formatted (it is 
best to use a previously unformatted disc) 
into the 40 track drive, (or the 80 if 
that's all you have), and press Return. 


The program first checks to see if there 
is any data on the disc. 
3. The 40 track section is formatted 


first, and then, as prompted, the 80 track 
section. Two dummy files are created (to 
'hide' the unused tracks). 


4. The disc is now dual-formatted and can 
be remóved from the drive. Further discs 
can be similarly formatted. 


SAVING FILES ON А 40/80 DISC 

If you only have an 80 track drive 
which is not software or hardware 
switchable to 40 track (double-step) mode, 
then it is impossible to save files 
correctly on a dual-formatted disc. Using 
dual (or switchable) 40 and 80 drives, 
insert the disc into the 40 track drive 
and save the program. Now insert the disc 
into the other drive and save the program 
again using the SAME filename. 


You must ALWAYS save a program on both 
parts of the disc at the same time to 
avoid catastrophic catalogue upsets. How- 
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1220 LOCAL X$:X$-18-LENtSDIV2 
1230 PRINTTAB (X%,Y%) t$; 
1240 ENDPROC 


d ever, you only need to 
delete a file once as 
this immediately changes 
the common catalogue. In 
fact, all the usual DFS 
commands will work cor- 
rectly in 40 or 80 track 
mode, except *COMPACT. 


1260 DEF PROCtitle:PROCcoff 

1276 LOCAL 2% 

1280 PROCdub(CHRS129-«TS$4CHR$135, 7) 
1290 PROCcen (CHR$130-4AS4CHR$135,14) 
1300 7%-ІМКЕҮ500: ЕМОРЕОС 


USING SWITCHABLE 40/84 DRIVES 

If you intend using a switcnable 40/80 
drive, switching first to 40 track mode 
and then to 80 track mode when formatting, 
you will need to modify two lines in the 
program. Replace  'drive40-drive80' іп 
lines 2250 and 2260 with 'FALSE'. Тһе 
modified program will not then function 


1320 DEF PROCinitialize:*FX4,1 
1330 LOCAL E% 

1340 err-0:cr$-CHRS$13:*OPT 
1350 READ errs:DIM e$ (errs) 
1360 FOR E$-0 TO errs-1 

1370 READ e$ (E%) :NEXT 

1380 error-TRUE:buffer-HIMEM 


— P— — 


correctly on a single 80 track drive. 


PROGRAM NOTES - see page 14. 
10 REM Dual 40/80 Disc Formatter 


osfile-&FFDD:osword-&FFFl 
oscli-&FFF7:osgbpb-&FFDl 
sectors-l0:ctrl-&50:ENDPROC 


DATA 10 


20 REM Version В1.0 1430 
30 REM Author Steve Turnbull 1440 DATA Abort 
40 REM BEEBUG Aug/Sept 1985 1450 DATA Clock error 


50 REM Program subject to copyright 
60 : 

100 MODE7:HIMEM-HIMEM-&200 
110 ON ERROR MODE7:PROCe 

120 T$2"49/80 Disc Maker" 
130 AS="S.D.Turnbull" 

140 PROCinitialize:PROCtitle 
150 ON ERROR PROCerror 

160 REPEAT PROCmake 

170 UNTIL NOT FNagain 

180 PROCquit:END 

190 : 


DATA Late DMA 

DATA ID CRC error 

DATA Data CRC error 
DATA Drive not ready 
DATA Read-only disk 
DATA Track 9 not found 
DATA Write fault 

DATA Sector not found 


4 DEF FNin(k$):PROCcon:LOCAL 1% 


REPEAT I3=INSTR(k$,GETS) 
VDU-7* (1%=0) :UNTIL 1%<>0 


1000 DEF PROCerror 1580 PROCcoff:=1% 
1910 IF ERR=17 PROCerr:ENDPROC 1590 : 
1020 IF ERR>128 PROCfserr:ENDPROC 1600 DEF PROChead(t$):VDU26,12 


1030 DEF PROCe 

1040 ON ERROR OFF:PROCquit 

1450 REPORT:PRINT" at line ";ERL:END 
1060 : 

1070 DEF PROCquit: *FX15 

1080 CLS:PROCcon: *ЕХ4 

1090 PROCdub(CHRS129*TS4CHRS135,8) 
1160 PRINT:ENDPROC 


PROCdub (СНВ$1 33++$+СНВ$1 35,0) 
PRINT ' : ENDPROC 

DEF FNask (t$,a$,Y%) 

РВОСсеп (CHR$130+t$+"?"4+CHRS1 31 ,Y£) 
LOCAL A%,B%:A%=FNin (a$) 

REPEAT B%=A%:VDUASCMIDS (a$,B%) ,8 
A%=FNin (a$tcr$) :UNTIL A%S>LENaS 


1110 : 1690 -B$ 
1120 DEF PROCcon:VDU23; &FFØB; 0; 0; 0; : END 1766 : 

PROC 1716 DEF PROCread (D$,T$,S$,B$):ctrl?0-D 
1130 : $ 
1140 DEF PROCCOÓff:VDU23;11;0;0;0; :ENDPR 1720 ctrl!l-B$:ctr1?5-3:ctr1?6-&53 

ос 1730 ctr1?7-T$:ctr1?8-S$:ctr1?9-821 
1150 : 1740 PROCdfs (ctr1,190) : ЕМОРВОС 
1160 DEF PROCdub(t$,Y$) 1750 : 
1176 PROCcen (CHR$141+t$,Y%) 1768 DEF PROCwrite(D$,T$,S$,B$):ctrl?0- 
1180 PROCcen(CHR$141-4t$,Y$*1) D$ 
1190 ENDPROC 1770 ctrl!l-B$:ctrl?5-3:ctr1l?6-&4B 
1200 : 1780 ctr1?7=T%:ctr1?8=S%:ctr1?9=&21 
1210 DEF PROCcen(t$,Y$) 1796 PROCdfs (ctrl,190):ENDPROC 
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1800 : 

1810 DEF PROCformat (D$ 
,T$,B$) 

1820 ctrl?0-D$:ctrl!l- 
B$:ctrl?5-5:ctr1?6-&63 
1830 ctr1?7-2T$:ctr1?8- 
21:ctrl1?9-&2A:ctrl?l0-0 
1840 ctr1?11=16:PROCdE 


S(ctrl,12):ENDPROC 

1850 : 

1860 DEF PROCsectid (T$,B$) 

1870 LOCAL 5%,1% 

1880 FOR 5%=0 TO sectors-l:I$-B$*S$*4 
1890 1%?70=Т%:1%?71=0:1%72=5%:1%73=1 

1900 NEXT: ENDPROC 

1910 : 

1920 DEF PROCdfs (C$,E$):LOCAL А%,Х%,Ү%, 


1930 Л%-87Е:Х%-С%:Ү%-Х%01У256 

1940 REPEAT R$-R$*1:CALL osword 

1950 UNTIL С%2Е%=0 OR R$-12 

1960 IF C$?E$ IF error err-(C$?E$-6)DIV 
2:*FX125 

1970 :ENDPROC 

1980 : 

1990 DEF PROCerr:*FX15 

2000 LOCAL Z$ 

2010 PROCcen(CHR$129-*e$ (err) ,УРО5%4) 
2020 Z%3=FNin(cr$) : PROCcoff 

2030 err-0:ENDPROC 

2040 : 

2054 DEF PROCfserr:err-errs 

2060 eS (err) =FNreport 

2070 PROCerr: ENDPROC 

2080 : 

2090 DEF FNreport:LOCAL Р%,а5 

2100 P$-((!&FD)AND&FFFF) +1 

2110 IF ?P$-0 =а$ 

2120 REPEAT а$=а$+СНВ$?Р% 

2130 P$-P$41:UNTIL ?P$-0:-a$ 

2140 : 

2150 DEF PROCmake:PROChead (T$) 

2160 LOCAL drive40,drive80,Y$,2$ 

2170 Y$-VPOS*2 

2180 drive80-FNask("Which drive is 80 t 
rack (0-3)","0123",Y$)-1 

2190 drive4ü-FNask("Which drive is 40 t 
rack (0-3) ","2123",1%+2)-1 

2246 PROCclean(Y$,Y$*2) 

2210 PROCcen(CHR$13Q0*"Insert disc іп 40 
track drive",Y$) 

2220 Z$-FNin(cr$) 

2234 PROCdatachk (drive40) 

2240 PROCdotracks (drive40,0,0 ,FALSE) 
2250 PROCdotracks (drive46,5,9,drive40-d 
rive80) 

2260 PROCdotracks (drive40 ,20,39,drive40 
-drive80) 

2270 PROCcen (CHR$130+"Insert disc in 80 
track drive",Y%) 
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2280 Z$-FNin(cr$) 

2290 PROCdotracks (drive80,5,9,FALSE) 
2300 PROCdotracks (drive80,20,39,FALSE) 
2310 ENDPROC 

2320 : 

2330 DEF PROCdotracks (D$,F$,T$,step$) 
2340 FOR track$-F$ TO T$ 

2350 PROCcen (CHR$134+"Track "+STRStrack 
%,Ү%%2) 

2360 IF step$ trak$-track$*2 ELSE trak$ 
-track$ 

2370 PROCsectid (track$,buffer) 

2380 PROCformat (D%, trak%, buffer) 

2390 NEXT 

2400 IF F$-0 PROCdiskinit (0%,40) 

2410 PROCclean (Y%+2,Y%+4) : ENDPROC 

2420 : 

2430 DEF PROCdatachk (D$) 

2440 LOCAL F$,Y$,Z$,error:Y$-VPOS*2 
2450 PROCclear (buffer) 

2460 PROCread (D%,9,1,buffer) 

2470 F%=buffer?5 DIV8 

2480 IF F$-0 OR buffer?5-&E5 ENDPROC 
2490 PROCcen (CHR$131+"Disc contains dat 
a",Y$*2) 

2500 РВОСсеп (CHR$131+"Escape to abort", 
Y3+4) 

2510 Z$-FNin(cr$):PROCclean(Y$*2,Y$*4) 
2520 ENDPROC 

PAST. | С 

2540 DEF PROCdiskinit (0%,Т%) 

2550 PROCcen (CHR$129+"Initialising...", 
Y%+4) 

2560 PROCclear (buffer) 

2570 S(buffert8)-"dummy " 

2580 S$(buffer+16)="dummy " 

2590 buffer?15=ASC"S" OR 880 

2600 buffer?23=ASC"S" OR &80 

2610 PROCwrite(D$,0,0,buffer) 

2620 PROCclear (buffer) 

2630 buffer?5=16 

2640 buffer?6- (sectors*T$)DIV256 

2650 buffer?7-sectors*T$ 

2660 buffer!12-864006400 

2670 buffer!20-&0A002800 

2680 PROCwrite (D$,0,1,buffer) 

2690 ENDPROC 


2710 DEF PROCclear (B$):LOCAL L% 
2720 FORL$-0TO255STEP4:B$!L$-0:NEXT 
2730 ENDPROC 


2750 DEF PROCclean(Y$,Z$):LOCAL X% 
2760 FOR Х%-Ү% TO Z$:PRINTTAB (0,X$) SPC4 


2770 NEXT:VDU31,0,Y$: ENDPROC 

2780 : 

2798 DEF FNagain:PROChead (T$) 

2800 =FNask ("Another disc ","YyNn",6)«3 
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AMX UTILITIES 


Product : AMX Utilities 
AMX Desk 
Supplier : AMS 
Green Lanes, TAN 
Warrington, WA4 5NG. 
: £14.95 (disc) 
£24.95 (disc) 


With the release of AMX 
Utilities and AMX Desk the 
AMX mouse comes of age. 
These two packages enable 
the mouse fan to make his 
Beeb even more of a 
Macintosh. 


Price 


The AMX Utilities 
package comprises add- 


The AMX Mouse 
grows up 


The AMX Mouse has 
already captured the 
imagination of man 
Beeb owners. Geo 


Product : Colour Art 
Supplier : Watford Electronics 
250, Lower High Street, 
Watford, 
Herts. 
Price : £14.95 (disc) 
original icon design 
program and so you can leap 
into it without a glance at 
the manual. All good stuff. 
Although the old set 
patterns are good there is 
no substitute for your own 
ideas. Now you can, say, 
fill in an area of -the 
screen with a frieze of 
your initials. 


itional utilities that | Bains test drives the 

complement the AMX Art ftwa Another enhancement of 
package supplied with the n pU mio tf rd AMX Art is the option to 
mouse. It could be said om an atio call up a printer dump 


that this package fills in 
all the gaps left in AMX 
Art, but that perhaps is а 
little harsh. The  AMX 
Utilities package comes 


Electronics. 


routine in one of the many 
utility ROMs that you might 
have in your machine. 


The slide show 


complete with an improved 
AMX Art program, and an 
identical copy of the old 
Design program, that 
completely replace your old 
software. In addition to 
these, there is a colour 
sketch program, а fill 
pattern designer, picture 
border stripper, а  'slide 
show' generator (could it 
be that AMS is an ardent BEEBUG watcher?) 
and the utilities suite itself. 


Like the AMX Art package, the software 
is supplied on a 4@ track disc with.a 
program to convert it to 80 tracks. 
Unfortunately, the disc used has no 
write-protect notch, so this is not 
possible. However, a pair of scissors soon 
Sorts out that problem. 


There are two changes in the new AMX 
Art program. Firstly, a bug in the old 
program that affected long term use has 
been cleared up and, secondly, the option 
of loading up different fill patterns is 
provided. 


New fill patterns of your own design 


are created with the separate Design 
program. This is very much like the 


Beebug August/September 1985 


generator displays a series 
of specified pictures 
generated with AMX Art one 
after another, either 
automatically or at the 
press of a (mouse) button. 


The major reason for 


buying AMX Utilities, 
however, has to be the 
utilities suite. Although 


these are used to operate on АМХ Art 
pictures, the suite is self contained. It 
is not called from within AMX Art - a pity 
as this makes hopping between creating a 
picture and fiddling with it using the 
utilities much more cumbersome. It would 
have been nicer to have all the utilities 
on menu in AMX Art and overlay them fron 
disc. 


Calling up AMX Utilities presents you 
with a screen with three pull down menus 
at the top and a picture space in the 
centre. There are four utilities provided 
- Zoom, Copy, Curves, and Icons, 


ap. 


Zoom provides a B 
facility that was 
obvious by its absence 
from AMX Art. Now 
you can enlarge a | 2 


small section of your picture to full 
screen size and operate at pixel level. 
Locating the cursor over a single pixel 
space (now a character size) and pressing 
a mouse button will put a pixel in there, 
if there isn't one already, or wipe out 
the pixel already there. This allows you 
to put that final exact touch to your 
pictures that make them 
look that much more 
professional, especially in 
printer dump form where 
every slip shows up. 


The Copy utility isa 
lovely addition. Any area 
of your picture can be 
copied onto another place 
in the same picture after 
being rotated through any 
number of right angles, or 
reflected in either axis. 
That's not all. The copy 
can either be drawn over 
whatever is in the des- 
tination position, invert- 
ed, or the space wiped 
clear first. 


> File Edit Effects 


The Curves facility is 
another that was sadly 
missing from the original 
AMX Art. Whereas that 


program allowed only full 
circles to be drawn, this 
utility gives you arcs and 


ellipses, again with the 
invert, over, or wipe 
options. The inability to use this 


facility from the main AMX Art program 
reduces its usefulness very considerably. 


The last utility in the suite is 
titled Icons. This uses one or more files 
of icons created with the Design program 
(components and music files are provided 
as starters) to build up pictures or to 
add to existing pictures. If your skill 
with the mouse is not quite up to scratch, 
a 'gridlock' system can be brought into 
effect to accurately position the icons, 
aligned with an invisible grid. Again, 

icons can be positioned over one 

A another, inverted, or over- 

* E write previous icons. 
Combined with the ease 

and naturalness of the 
mouse, this has to be 
the best method of 


producing technical diagrams available for 
the non-draughtsman. 


AMX DESK 

How Macintosh can a Beeb get? With AMX 
Desk the answer has to be very. AMX Desk 
gives your Beeb all the kinds of desk-top 
management features that Apple is so proud 
of pushing in its adverts. 
AMX Desk is really several 
different programs combined 
together in an easy-to-use, 
mouse-driven package. 


First up (literally) is 
a clock and calendar. On 
boot-up you are asked the 


date and time (unfort- 
unately you must type it in 
- you can't just press 
Return if you're in a 
hurry) and this is 


remembered until you next 
do a Ctrl-Break. Then the 
typical desk-top simulation 
is presented with icons for 
the drives, the diary/ 
calendar, telephone number 
list, and memo pad. A 
calculator is also included 
but this is hidden away in 
one of the pull down menus 
and isn't always available. 
If you use a second 
processor then the cal- 
culator is available at all 
times. Either way, using 
the mouse to position the 
cursor over the buttons of 
an iconic calculator has to be the worst 
way of getting your sums right, so it's no 
great loss. Selecting a disc icon will 
give a catalogue of the disc complete with 
icons to describe the types of file there. 
Selecting an item directly from this 
catalogue, with the mouse, will CHAIN or 
*RUN it as appropriate. 


The diary/calendar 1$ a lovely piece 
of programming. It gives you a calendar of 
three months starting at the present. This 
can be scrolled back and forth across a 
two year period and any day selected. Now 
three days are displayed, and entries can 
be made from the keyboard. Any day with an 
entry is shown in inverse video in the 
main calendar. The whole lot is stored to 
disc, so your complete appointments can be 
filed away without ever putting pen to 
paper. 
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An alarm is also used that enables 
your Beeb to prompt you at any time of any 
day that an appointment is due. The 
usefulness of this is lessened by the fact 
that it will only operate if you are using 
AMX Desk at the time the alarm is due. 


Memopad is effectively a mini word 
processor. Up to three 
pages of 24 lines of 32 ——Ó n n n gn 
characters can be filled 


with text and saved onto 
disc. Simple editing 
facilities are provided 
along with centring апа 
justification - ideal for 
scribblings! More advanced 
facilities enable you to 
take sections of the memo 
and  'paste' them into 
another memo or even into a 
diary entry. 
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have seen in the AMX Utilities package. 
Using Colour Art, pictures created with 
AMX Art (and the Utilities for that 
matter) or any other similar package can 
be coloured in four colours. There are two 


clever points to this software. Firstly, 
the mode 4 AMX Art picture is, on loading, 
converted by the program into а mode 1 
picture in two colours, 
whereupon it can be 
coloured in with the 


remaining two colours of 
mode 1. 


The other clever trick 
is that, although only four 
in total are used, 
the package gives you a 


menu of sixteen shades, 
mm created with stipple 
patterns, to choose from. 
The four 'primary' colours 


The third major part of 
AMX Desk is the telephone/ 


can also be changed in the 
normal VDUI9 type way апа 
this data saved with the 


address 'book'. This is a 
simple database for brief 
details on all your 
contacts. The initial 
Screen of this program is 
designed like the real 
thing with an alphabetic 
index down the side. 
Selecting any letter with 
the mouse displays the 
entries for that letter 
which can also be printed 
out for a more permanent 
record. 


As a suite of useful everyday programs 
AMX Desk excels. However, it is not on to 
stretch it to the more arduous task of 
providing an  icon-based environment from 
which to use your Beeb. That is where AMX 
departs from Mac. To give them credit, AMS 
and Elliot Software have done their best 
to establish the AMX system at the lowest 
of ‘levels, but without re-writing the 05 
this is not that practical. If you are 
looking for a genuine Macintosh, you will 
have to spend the #2000 odd needed. If, 
however, you are happy with having to know 
a fair bit of the 'technical' operation of 
a computer but still want the easy front 
end, AMX is the answer. 


COLOUR ART 
Watford's Colour Art is just the kind 
of program that it would have been nice to 
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picture. 


The Colour Art package, 
of course, uses the mouse 
to actuate all the options. 
Shades are selected by 
moving a (rather grotty) 
cursor over the shade menu 
boxes, pressing the Execute 
button, and then moving to 
the area that needs 
colouring. This area can be 
any part of the picture 
bounded with a solid line. 
Even an area already 
'filled' with a monochrome AMX Art pattern 
can be re-filled in colour. 

The intention is obviously to make the 
Colour Art package emulate (in colour) the 
original AMX Art. However, the operation 
is not as slick as the original and the 
presentation generally inferior. There are 
no beautifully designed icons on the 
Screen in this work, only а flickering 
cross cursor. However, Colour Art is not a 
poor program and provides a highly novel 
and useful way in which to obtain high 
resolution colour pictures using the 
mouse. For that, at least, E 
Watford Electronics NW ” 
must be congratulated. 
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BBL POP-UP 
CALCULATOR 


With all the power of the micro 
at your finger tips, what better 
than an instantaneous pop-up 
calculator that can be called up 
when in the middle of using 
Wordwise or some other 
program. David Pilling explains. 


Very often, either when using an 
application program or editing a program 
on your computer, the need arises to do 
some trivial calculations. Despite having 
a computer in front of you, the usual way 
of coping with this situation is to keep a 
calculator by the side of the machine. The 
reason is that the computer is tied up 
doing something else and you can't 
therefore use it. In recent times this 
problem has 1еа to the availability of 
programs for personal computers which at 
the press of a key allow a set of tools 
like a notepad or telephone book to be 
used in the middle of another program. 


So far such facilities are not 
generally available on home computers. It 
would seem therefore that their users must 
hang onto their old pocket calculators. 
All is not lost however, аз the program 
presented here will turn a BBC micro into 
a fair approximation of а standard four 
function calculator, which can be used 
from within another program. 


Suppose that you are in the middle of 
a program. Pressing the 8 key will cause 
the calculator to appear in the top left 
hand corner of the screen, identifying 
itself with a # prompt. You can now go 
ahead and calculate whatever you like. 
Pressing Tab will return you to the 
original program. The calculator will 
clear а window of 15 characters, and your 
calculations should be kept within this 
window otherwise the program will not be 
able to clear it all. 
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The following keys are used to control 
the calculator; 


*: for addition 
: for subtraction 
: for multiplication 
: for division 
: for clear 


в И 


space ba 


If you wish to use negative numbers 
(i.e 64*-20) then the underscore (_ key) 
Should be used for the minus sign. 


Return is the equivalent of the normal 
"equals" key. Numbers can be entered in 
the usual floating point notation using *, 
_ (underscore), Е and . where appropriate. 
Delete will also work as usual algebraic 
notation is used. Please note that as with 
a normal calculator, the current operation 
(e.g. *,-,*,/) does not appear in the 
window. 


The calculator should work with your 
own programs and we have also used it to 
good effect with Wordwise and Wordwise 
Plus for example, although we seem to have 
had difficulty with Wordwise Plus 
'hanging', not only with the calculator 
but with some other software. There is no 
real explanation for this at the moment, 
but if you do have trouble, then try 
clearing your machine before running the 
program, 


SETTING UP THE CALCULATOR 


To get this useful facility into your 
computer, type in the program and then 
save it. When run, this program will 
assemble the machine code for the 
calculator and change the necessary 
vectors to point to the calculator 
routine. As soon as the program has been 
run, you can test the calculator, by 
pressing @. If there are any errors in the 
program, then before correcting them and 
re-running it, you must press Break (to 
reset the vectors) and then type OLD. 


PROGRAM NOTES 


The program works by enabling the 
'character entering buffer' event and then 
intercepting the event vector (at &220). 
In fact, the event is used in an 
interesting way. The usual problem with 
events or interrupts, is that the code 
executed by them must only take a short 
amount of time if the interrupt system is 
not to be upset and in the worse case 
bring the machine to a grinding halt. 
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However, when actually in the event, 
the return address is kept 21 places down 
the stack. By storing this in the 
locations rl and rh (lines 1100 and 1139) 
and then replacing it with the start 
address of the calculator (lines 1110 and 
1140), it is possible to arrange for the 
calculator to be re-entered on return from 
the event. To return to the original 
program, an indirect jump to the location 
in rl, rh is done (line 1250). 


The calculator makes use of the 
floating point subroutines in the BBC 
Basic ROM. Since these are in different 
positions in BASIC I and BASIC II the 
program detects which version of Basic is 
in the computer (in line 100) and then 
uses either PROCB] (line 2520) or PROCB2 
(line 2590) to provide the appropriate 
addresses. 
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to put the code somewhere else. One 
possibility is to put it &200 bytes below 
Screen memory. So if you intend to work in 
mode 2, then line 110 should be changed as 
follows: 
110 enter=&2E00 
The corresponding value for each mode 


can be obtained by the following 
algorithm: 
MODE n 
PRINT ^HIMEM-&200 
It is поё possible to save the 


assembled machine code for future use 
unless the program were to be extended 
(using more than two pages of memory) to 
reset the event vectors. This extra memory 
will often not be available. 


Now with this calculator available at 


the press of a key, you can put all of 
your old adding machines away and use your 
BBC micro. Alternatively, you might like 
to use the principle of the program as the 
basis for a routine of your own. 


The position of the machine code in 
memory is determined by the value in line 
For disc users &900 should work in 
have 


119. 
most cases, but cassette users will 


10 REM POPUP CALCULATOR 1110 LDA#cs MOD256:STA &100 
26 REM VERSON B0.3 ‚У 

30 REM ВУ D.J.Pilling 1126 INY 

40 REM BEEBUG AUG/SEPT85 1130 LDA&100,Y:STA rh 


1350 LDA#252:LDY#255:LDX#0: 
JSR OSBYTE 

1360 STX rom 

1370 LDA$187:LDY$255:LDX40: 


50 REM PROGRAM SUBJECT 1140 LDA#cs DIV256:STA 8100 JSR OSBYTE 
60 REM TO COPYRIGHT ,Ү 1380 STX &FE30 
70 : 1150 PLA:TAX:PLA:TAY:PLA:PL 1398 
100 IF?&8015-50 PROCB2 ELS P 1400 .start LDA#0:LDX#4 
E PROCBI 1160 JMP event 1410 .sl STA fp,X:DEX:BPL s 
110 епёгг=&900 1176 1 
120 event-?82204256*?&221 1180 .exit 1420 LDA#eq:STA col 


130 IFevent=enter END 1190 LDX rom:STX &FE30 1430 JSR cur 
140 PROCSETUP 1200 LDA#31:JSR OSWRITE 1449 
1 150 PROCASSEMBLE 1210 PLA:JSR OSWRITE 1450 .1р 


| 160 ?&220=evs 
170 ?8221-еув DIV256 


1220 PLA:JSR OSWRITE 
1230 LDA#14:LDX#2:JSR OSBYT 


1460 JSR getn 
1470 JSR inte 


180 *FX14,2 E 1480 LDA co2:STA col 
| 190 PROCINFO 1240 PLA:TAX:PLA: TAY: PLA: PL 1490 BNE lp 
200 END P 1500 
212 : 1250 JMP (rl) 1519 .inte 
1000 DEFPROCASSEMBLE 1268 1520 LDA#fp DIV256:STA&4C 
1010 FORIS=0TO3STEP3 1270 .cs 1530 LDA#£p MOD256:STA&4B 


1020 P%=enter: [ОРТ I$ 

1030 A 
1940 .evs РНР:СМР#2:ВМЕ evx 
1050 РНА:ТҮА:СМР#аё:ВЕО eva 1300 TXA:AND#64:BNE cs2 

1060 PLA 1316 LDA4134:JSR OSBYTE:BNE 
1070 .evx PLP:JMP event cs3 

1080 .eva PHA:TXA:PHA 1320 .cs2 LDX&364:LDY&365 
1090 TSX:TXA:CLC:ADC#21:TAY 1330 .с53 TYA:PHA:TXA:PHA 
1100 LDA&100,Y:STA rl 1340 LDA#13:LDX#2:JSR О5ЗҮГЕ 


1280 PHP:PHA:TYA:PHA:TXA:PH 1540 LDA col 

1550 CMP#A:BNE i2 

1560 JSR add:JMP i8 

1570 .i2 CMP#S:BNE i3 

1589 JSR sub:JMP i8 

1590 .i3 CMP#M:BNE i4 

1600 JSR mul:JMP i8 

1610 .i4 CMP#D:BNE 18 

1620 LDX#4 = 


1290 LDA#117:JSR OSBYTE 
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1630 .dtp LDA&31,X:BNE dtx: 1990 CMP#mis:BNE all:LDA #S 2360 co2=FNS(1):CX=FNS(1):e 


DEX:BPL dtp :JMP n2 nd-P$ 

1640 PLA:PLA:JMP start 2000 .all CMP#D:BEQ n3 2370 rom-FNS (1) 

1650 .dtx JSR div 2010 СМР#М:ВЕО n3 2380 NEXT 
| 1660 .i8 2020 CMP#S:BEQ n3 2390 ENDPROC 
| 1670 JSR str 2030 CMP#A:BEQ n3 2400 : 
| 1680 LDA49:STA&l5:TAY:DEY 2040 CMP#C:BEQ пб 2410 DEFENS (№) : P$-P$4N$:-P 

1690 JSR f2a 2050 CMP#tab:BEQ ne $-N$ 

2060 CMP#del:BEQ n8 2420 : 
1718 RTS 2070 CMP#eq:BEQ n3 2430 DEFPROCSETUP 


2440 OSWRITE-&FFEE:OSBYTE-& 
FFF4 

2450 OSRDCH=&FFEG 

2460 г1=&70: rh=&71:st=&600 

2470 mis=95:poi=46:E=69 


1720 2080 CMP448:BCC np 

1730 .pri 2090 CMP#58:BCS np 

1749 JSR cur 2100 .n2 LDX CX:BNE n9 
| 1759 LDX&36:LDY#0 2110 PHA:JSR cur:PLA:LDX CX 
| 1760 .pp LDA st,Y:JSR OSWRI 2120 .n9 STA st,X:INC CX 


1702 JSR pri 


TE 2130 .n7 JSR OSWRITE 2480 eq=13:C=32:M=42:D=47:A 
| 1774 INY:DEX:BNE pp 2140 BNE np =43:5=45 
| 1780 RTS 2150 .n3 TAY 2490 del-127:at-64:tab-9 
1790 2160 LDA CX:BNE n4 2500 ENDPROC 
1800 .cur 2170 STY col:JMP getn 2519 : 


2520 DEFPROCBI 
2530 add-&A50E:sub-&A50B 
2540 div=s&A6B8:mul=sA661 


1818 JSR crx 
1820 LDX#18:LDA#32 
1830 .crl JSR OSWRITE:DEX:B 


2180 .n4 STA&36 
2190 TYA:STA co2 
2200 JSR a2f 


NE crl 2210 CMP#&40:BNE nx 2550 i2f-&A2AF:str-&A37E 
1840 JSR crx 2220 JSR i2f 2560 a2f-&AC5A:f2a-&9EDU 
1850 RTS 2230 .nx RTS 2570 ENDPROC 
1860 2240 .n6 PLA:PLA:JMP start 2580 : 

1870 .crx 2250 .n8 LDX CX:BEQ np 2590 DEFPROCB2 


2600 add-&A500:sub-&A4FD 
2610 div-&A6AD:mul-&A656 


2260 DEC CX:JMP n7 
2270 .ne PLA:PLA:JMP exit 


1880 LDA#31:JSR OSWRITE 
1890 LDA49:JSR OSWRITE 


1900 LDA$0:JSR OSWRITE 2280 2620 i2f-&A2BE:str-&A38D 
1910 LDA#35:JSR OSWRITE 2290 .get 2630 a2f-&AC34:f2a-&9EDF 
1920 RTS 2300 .gp JSR OSRDCH:BCS ge 2640 ENDPROC 

1930 2310 ЕТ5 2650 : 

1940 .getn 2320 „де CMP#27:BNE gp 2660 DEFPROCINFO 

1950 LDA40:STA CX 2330 LDA#126:JSR OSBYTE:BNE 2670 PRINT'''"Popup Calcula 
1960 „пр JSR get gp tor located at &"; enter;"." 


1974 CMP#E:BEQ n2 2340 | 2680 PRINT'"Length ";end-en 


1980 CMP#poi:BEQ n2 2350 fp=FNS (5) :col=FNS (1) ter;" bytes."'' 
2690 ENDPROC к 
ASAE AE SPREE TESTIS STE TSI IT LES URBC OE O TELE анны EELS КЫ Че OT IE LER TNE IT ot III ET T IHR OLR REM S EEE 
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40/89 UTILITY - PROGRAM NOTES 


This well structured program is in 
Basic, but uses several of the OSWORD 
calls for various disc routines. The 
recently released ‘Advanced Disk User 
Guide' (on special offer to BEEBUG members 
- see BEEBUGSOFT adverts) also contains a 
wealth of information. 


The most useful routines used (which 
could prove useful in other applications) 
are as follows: 


PROCinitialise sets up global variables, 
buffer areas and error messages. 


PROCread reads and PROCwrite writes a 
specified sector using the buffer. 
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PROCsetid sets up sector identification 


(including logical track) for use by 
PROCformat. 
PROCdfs is a general OSWORD call using 


preset parameter block. 


PROCmake produces a dual-format a disc, 
PROCdotracks formats a sequence of tracks 
in single or double-step mode, and 
PROCformat formats a specified physical 
track. 


PROCdatachk checks for the presence of 
data by reading catalogue (if possible). 


PROCdiskinit initialises the catalogue 


including entries for two dummy files. SES] 
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Creative Sound 


Will Creative Sound do for the 
budding musician what Creative 
Graphics did for р 
enthusiasts? Ian Waugh, the 
author of our recent series on 
Making Music on the Beeb, has 
been looking with some interest 
at this new book from Acornsoft. 


Creative Sound by David Ellis and Chris 
Jordan, published by Acornsoft, at £9.95 
for the book only, £17.95 for combined 
book and cassette, and £19.95 for book and 
twin dual-format discs. 

David Ellis is a computer musician 
well known to readers of other (music) 
magazines. Chris Jordan designed the 
Beeb's sound system (yes, he's responsible 
for the 14 ENVELOPE parameters) and the 
Acorn Music 500 (see BEEBUG Vol.4 No.1). 


The first two chapters describe the 
development of musical instruments, 
synthesisers and computer music. ТЕ 
includes such topics as psycho-acoustics, 
FM synthesis and Fourier synthesis, which 
may mean little to the reader, especially 
as such options are not possible on the 
Beeb. This would be the place to introduce 
the rudiments of music but such is not the 
case here, much to the relief of musicians 
I'm sure, but if you're not a musician you 
may struggle in later parts of the book. 


Chapters 3 and 5 contain programs 
which allow you to experiment with the 
SOUND and ENVELOPE commands but по 
in-depth explanations are given. It is 
assumed the best form of teaching is by 
experimentation. I often wished that a few 
more 'sample inputs' had been included - 
perhaps I'm just lazy. 


Chapter 4 includes a Music Interpreter 
which uses a simple yet quite powerful MCL 
(Music Composition Language). Chapter 9 
develops this into a full Music Compiler 
which translates MCL data into music. 
Eleven music files are given including 
several original compositions and Ligeti's 
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'Continuum' - а fairly modern classical 
piece of considerable complexity. 


Chapter 7 deals with real time music 
(playing the QWERTY keys) and contains 
four monophonic synthesiser programs. The 
"Еспо Synth' program, in particular, 
produces fascinating sounds and patterns. 


Chapters 8 and 9 tackle computer 
composition. Тһе 'Waltzes' program is 
based upon an idea, attributed to Mozart, 


in which 176 bars of notes are selected, 
not quite at random, to produce one of 
about 50 different waltzes. Six other 
compositional programs devise ways of 
keeping the random number generator within 
certain (musical?) limits, and some allow 
the user to influence the choice of notes. 
'Phasemusic' duplicates the sort of 
effects used by Steve Reich and Terry 
Riley. A series of notes is played on two 
channels, synchronised at first but a 
delay is introduced to the second channel 
so the music gradually drifts out of 
phase. This delay must be very small and 
the 5@ms minimum duration of the SOUND's 
duration parameter is too long. 'Qsystem', 
produces a machine-code fix to reduce D to 
lüms. It stays in the machine, too, so you 
can use it with other programs. 


The programs fully exploit the 
strengths of BBC Basic. Colour is not used 
at all, possibly to keep long programs as 
short as possible, but the omission 
results in bland displays. No programming 
concessions are made to the novice, or 
even the average, programmer. 


Last year, four books devoted to 
making music on the BBC micro were pub- 
lished. They may have taken a little wind 
out of the sails (and possibly sales) of 
Creative Sound as many of the ideas in 
this book have been implemented elsewhere, 
albeit in different forms. If your know- 
ledge of the Beeb's sound system and the 
rudiments of music is a little shaky you 
may benefit by studying one of the other 
books which explains them in more detail. 


As a musician with a particular 
interest in making music with computers, I 
can't fail but to recommend Creative 
Sound. I would also strongly suggest you 
buy the programs, too. Many are quite long 
and, I suspect, not easy to debug. s= 
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ACORNSOFT'S 
BASIC EDITOR 


Acorn at last concedes that 
there's more to editing basic 
programs than just using the 
Copy key. Geoff Bains, in a 
critical frame of mind, assesses 
Acornsoft's full screen editor. 


Product : Basic Editor 
Supplier : Acornsoft 
654 Newmarket Road, 
Cambridge. 
0223-214411 
Price : £29.90 
BBC Basic has a lot to be said for it. 
It's extensive, versatile, and fast. 
However, a major failing it has compared 
to the Basics of many other home computers 
is its editor. The simple screen copying 
technique that is used can be tedious in 
the extreme if a lot of editing is to be 
performed on a program. 


How much better, I have mused to 
myself for about three years, if someone 
would come up with a ROM that would make 
the Beeb emulate the full screen editors 
in such machines as the Commodore 64 and 
MSX. Acornsoft has made a brave (if 
belated) attempt to answer my prayers. 


The Basic Editor is a word processor 


for programs. In the package is a ROM 
chip, a key strip, and a forty page 
manual. The ROM is actually that, a ROM 


and not an EPROM which demonstrates that 


this version is here to stay. 


The editor is entered with *BE and 
presents you with a View-like title screen 
displaying program size, bytes free, and 
So on. Just like View or Wordwise, you can 
now switch between this control screen and 
the program itself with the Escape key. 


From the control screen some familiar 
sounding commands can be entered - LOAD, 
SAVE, NEW, OLD, and MODE - and a couple of 
new ones - HELP prints out a help screen 
with all the Basic Editor's commands, and 
INFO gives you the detailed low-down on 
the program in memory at the time. 
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A couple of nice touches have been 


added. Like View, no inverted commas are 
needed for filenames when loading and 
saving. The MODE command changes the 


display mode of the editing screen (the 
control screen stays in mode 7 all the 
time). In modes 3 and 6 this defaults to 
the striped blue background, so much 
favoured іп "Тһе Computer Programme’ and 
in other modes the plain blue background 
is used. Modes 2 and 5 are not allowed. 
The edit screen mode defaults, on entering 
the Basic Editor, to whatever mode your 
machine was in before leaving Basic. 


From the edit screen, using the Basic 
Editor is just like using a word pro- 
cessor, all be it a somewhat warped one. 
The cursor keys move you freely around the 
Screen and new program statements can be 
typed in at any position with an 
insert/overwrite option. This is switched 
with a function key. The function keys are 
made to work for their living with 28 
options controlled using function keys and 
Shift or Ctrl. Many of these options are 
doubled by commands typed in full. 


Where the Basic Editor shows its 
orientation to programs rather than text 
is in its handling of program lines. When 
editing a program you have no access to 
the line numbers. They are there mostly 
for show. Pressing Return anywhere in the 
program inserts a new program line which 
is automatically numbered for you. If 
there isn't enough space for a new line 
number, the whole program is renumbered 
automatically. That is fine, and it makes 
entering programs very easy (once you're 
used to it). However, things are not so 


simple when you want to go the other way. 
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The BASIC Editor 


Program size 10454 
Bytes free 14890 
Screen mocde ? 


IE 
INFO 
INSERT 


OLD 

OVERT YPE 
ОСНАНСЕ 51 52 
RENUMBER ni n2 


NUMBER 


program; 

52 are strings; 
n2 are numbers; 
colour (N,R,G,Y 


.В,М,С,ш> 


To join program lines together а 
complicated manoeuvre of cursor movement 
and function key pressing is required to 
remove the offending line number. 


Like a word processor, the Basic 
Editor has several commands that deal with 
blocks of program lines. The block between 
any two program lines, first marked with 
another function key press, can be copied 
or moved to another part of the program or 
simply deleted altogether. A nice feature 
is that a line can be tagged with another 
marker and the cursor moved to that line 
from another part of the program with a 
single key press. 


The redundancy of line numbers is 
really shown up by the labelling system 
employed in the Basic Editor. When vou're 
writing a program in the Basic Editor you 
can forget about line numbers and refer to 
previous or forthcoming lines in a program 
with a label. You can quite legitimately 
enter: 


100 IF Х>20 GOTO @BIGX 


The @ symbol denotes a label name. At the 
point in the program pointed to you have 
to insert a REM statement of the form: 


2000 REM @BIGX 


When the program is next renumbered, or 
NUMBERed, the references to labels are 
replaced with line numbers as needed. 


From the control screen several other 
advanced features are available. Most 
notable of these is the search and replace 
facility. There are many ROMs that include 
this (notably BEEBUGSOFT's Toolkit) but to 
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have a search and replace included in the 
editor does make life easy. 


The Basic Editor's search and replace 
is pretty sophisticated. There are four 
commands associated with this facility. 
EDIT <string> will present you with the 
first occurrence of the string in your 
program, in edit mode, and will take you 
on to the next occurrence with the press 
of а function key. FIND <string> will 
display all the program lines containing 
the string. CHANGE <stringl> <string2> 


will replace all occurrences of stringl 
with string2 and lastly, QCHANGE <stringl> 
<string2> will do the same but ask your 
approval in each case. What is sadly 


missing, however, is any kind of wildcard 
search facility. Only strings occurring in 
the program exactly as specified (taking 
account of letter case) will be 'found'. 


There are several other commands 
available in the Basic Editor. These are 
mostly concerned with changing the default 
values of such things as the background 
and foreground colour, tab stops, and so 
on. 


The Basic Editor operates well as a 
word processor for programs. If that is 
all you want then you will not be unhappy 
with Acornsoft's efforts. However, I must 
admit that I was a little disappointed. 
The Basic Editor is too much like a word 
processor and has become divorced from 
‘normal' Basic programming because of 
this. Although a program can be RUN from 
within the Basic Editor (in fact it 
returns you to Basic first), you have the 
feeling that you are not really ina 
programming language at all. 


I would have preferred to have seen an 
editor that knitted more closely in with 
the existing Basic editing procedure, that 
used a normal LIST command to display a 
program, but included a real full screen 
editor. Such goodies as the search and 
replace could then Бе included as 
stand-alone utilities. As it is, the Basic 
Editor requires you to learn a whole new 
system of writing programs. 


However, the Basic Editor is no mean 
feat in itself. Acornsoft may not have 
answered my own prayers in quite the way I 
wanted, but writing a Basic program on the 
Beeb is certainly easier now than it ever 
has been before. sa) 
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Eprom 
Programmer 
Project 

Geoff Bains, arai, Ron in 
hand, describes the first stage in 
our constructional project to 
build an EPROM programmer. 
This month he introduces the 
subject and provides step-by- 


step instructions for 
constructing the hardware. 


One of the Beeb's most versatile 
features is its ability to hold several 
system programs in its memory map, in ROM, 
at the same time, and call upon the 
services of any of these whenever needed. 
Many software houses have made good use of 


this system of sideways ROMs. However, 
many users will have requirements for 
which a commercial ROM is not available. 
Nor сап they easily imitate the 


professionals and produce their own. 


That is, until now. Starting this 
month, BEEBUG is presenting all you need 
to know about creating your own ROM 
software for your own particular purposes. 


In the next few months we will be 
presenting software to produce the code to 
handle all the Beeb's complex ROM 
protocols from your own programs (both 
Basic and machine code), and we will be 
giving you examples of sideways software 
suitable for using in either sideways RAM 
or for blowing onto EPROMs. This month, 
however, we are starting the whole ball 
rolling with a DIY project to build your 
own EPROM programmer. 


EPROMS are Erasable, Programmable, 
Read Only Memory chips. That is, like ROMs 
they can only be read from, and not 
written to, by your computer, but unlike 
ROMs they can, under special conditions, 
be both programmed and erased. The erasure 
of EPROMs is carried out with ultra violet 
light. Special units are available to do 
this to several EPROMs at once and, 
because of the inherent dangers of strong 
Sources of ultraviolet light, it is 
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recommended that you purchase a 
professionally made unit to do this. If 
you are totally sure of the validity of 
the code that you are to put into an EPROM 
then a new EPROM is suitable as these are 
purchased blank. However, if the code is 
to be changed at a later date then an 
eraser is a worthwhile investment. 


The programming of EPROMs is another 
matter altogether. Commercial units are, 
of course, available for this task too but 
they can cost anything from about £50 to 
several hundred pounds for the really 
sophisticated models. The BEEBUG DIY EPROM 
Programmer will only cost you around £25 
but offers all the facilities needed to 
program 8K or 16K EPROMs. 


You can build the ВЕЕВОС EPROM 
Programmer with one of two attitudes of 
mind. Either you can ignore all the 
technical details and just go ahead and 
put together the bits as will be described 
in a while. Alternatively, for those of 


you who want to know the technical 
details, this is how the whole device 
works. 


THE TECHNICAL DETAILS 


EPROMs, both 8K (2764) and 16K (27128) 
have the pin out as show in the diagram. 
The only difference between the two sizes 
is that the top address line, А13, is not 
included on the 8K EPROM. 


(1) Vpp Vcc 
A12 NOT program 
A7 A13 (27128 only) 
A6 A8 
A5 A9 
А4 All 
A3 NOT output enable 
A2 A10 
Al NOT chip enable 
AQ D7 
DØ D6 
DI D5 
D2 D4 
Earth D3 


To read an EPROM, the address lines 
(Að to Al3) are set up with the 14 bit 
value corresponding to the byte in the 
EPROM that you want to read, and the data 
is simply read off the eight data lines 
(04 to D7). The ‘output enable' and 'chip 
enable' lines are used to switch off, 
respectively, the data outputs and the 
whole chip. 
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Programming an  EPROM is quite a 
complex task. The address of the byte that 
is to be programmed is put onto the 
address lines, the data to be programmed 
is put onto the data lines, the Vpp line 
is taken to 21 volts and the NOT program 
line is taken low for 50 ms. 


The BEEBUG EPROM Programmer will cater 
for both these tasks - reading EPROMs to 
study them and programming your own 
EPROMs. 


THE CIRCUIT DIAGRAM 

Using both the User Port and the 
Printer Port we have sixteen data lines 
available to control the programmer. 


However, we need twenty two - eight for 
the data lines and fourteen for the 
address lines. To get around this problem 


the 74374 octal latch chip is used. When 
the latch line is taken high this chip 
will latch the data at its input, and 
output it from its eight output pins. 
Using this chip the eight low bits of the 
address can be latched (using the User 
Port CB2 line) and then the eight User 
Port data lines are free for passing the 
EPROM's data. The six high address bits 
are taken care of by the Printer Port. 


So that the data coming from the EPROM 


does not interfere with the low eight 
address bits before they are latched by 
the 74374, we need to be able to switch 
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off the EPROM data output. This is taken 
care of by connecting the МОТ output 
enable line of the EPROM to bit 7 of the 
Printer Port. 


The 5 volt supply for the circuit is 
taken from the User Port. However, there 
is no 21 volt supply in the computer for 
EPROM programming. This is derived from 
the 5 volt line with the TL497A chip. This 
is a very useful device that can produce 
any voltage from about 6 to 30 volts from 
a5 volts supply. It is 
also provided with ап 
inhibit line to switch tne 
output between the supply 
and output voltages. This 
we have connected to bit 6 
of the Printer Port so that 
the computer can switch the 
programmer between read and 
write operations (5 and 21 
volts). 


Lastly the NOT program 
input to the  EPROM is 
connected to the CA2 
control line of the Printer 
Port. This has to be pulsed 
low for 50 ms to program а 
byte in the EPROM. 


The eight  resistors 
connected between the eight 
data lines and earth are to 
keep the data lines at a 
low level when no EPROM is connected. This 
means that the software (comming next 
month) can distinguish between а blank 
EPROM in the programmer (which contains 
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all bytes set to &FF) and no EPROM present 
at all (all bytes are held by the 
resistors at &00). 


BUILDING THE PROGRAMMER 

There is just one circuit board in the 
BEEBUG EPROM Programmer. This is built оп 
stripboard so that it can be easily 
attempted by any BEEBUG member with just a 
little previous experience of soldering. 
At the end of this article you will see a 
list of the parts needed for the project 
(all bits are available from Maplin 
Electronic Supplies - tel. 0702-554155, or 
see the catalogues in W.H.Smith - or from 
other components stockists). You will also 
see two diagrams of the circuit board. 


The first diagram, on this page, shows 
the assembled board from the side with the 
copper strips. This shows the cuts in the 
copper tracks that must be made first. Use 


HIJKLMNOPORSTUVWXYZa 


ME ANER Y; 


Фочольюю-> 


зона ооо воно ово но очное та ала она онотоее > 


a 


USER PORT 


either a proper 'spot face cutter' for 
this or a drill bit (about 0.3 inch). The 
Second diagram, opposite, shows the 
component side of the board and the 
positions of all the parts. The success of 
your Programmer depends 
upon getting the right 
components into the right 
holes in the stripboard, so 
it is worthwhile spending 
some time on this. You may 
find it easiest to draw the 
positions of the track cuts 
and components onto the 
stripboard itself, making 
use of Ше co-ordinate 
system in the diagrams, 
before you actually under- 
take any irreversible 
actions like wielding the 
soldering iron or the spot 
face cutter. When you are 
satisfied that you have the 
layout right, make all the 
track cuts before you 
solder anything in place. 


оочоольом- 


Solder the chip sockets 
in first. The socket for 
the EPROM itself is 
soldered onto the 'wrong' 
side of the board so that 
it will stick out from the 
copper side through the 
case, with the rest of the 
board flat against the case 
top. This is quite a tricky 
operation and should be 
done first. Position the 
Socket correctly with the 
board, copper face up, on a 
table. Now carefully apply 
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PRINTER PORT 


the soldering iron and solder to each pin 
and its corresponding copper track, as 
they stand proud of the board. 


The rest of the components should now 
be soldered into position. 
With the majority of them 
you need not worry which 
way round they are to go. 
However, the 47uF capacitor 
must be inserted the right 
way around (positive end 
towards the edge of the 
board, as shown) and the 
two chips must, of course, 
be plugged into their 
sockets correctly (see the 
notches at one end of the 
chips in the diagram). 


WWNAALWN— 


When you have finished 
the board and checked it 
thoroughly for any mistakes 


(check especially for 
solder 'bridges' between 
tracks), you can make up 


the cables. With the red 
stripe on the 20 way cable 
to the right, clamp the IDC 
Socket around the cable 


with the locating lug 
uppermost. Repeat this 
procedure for the 26 way 
connector. Now solder 


eleven of the cores from 
the 20 way cable and nine 
from the 26 way cable as 
shown. 


Follow the diagrams on 


these pages carefully. A 
wrong connection at this 
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ЕНЕНЕ ЕНЕГЕ 


stage will mean that your EPROM Programmer 
will not operate correctly. 


THE CASE 

Now that the board is finished you can 
put the whole device into a suitable cáse. 
The choice of case is largely up to you. 
However, the case suggested in the parts 
list is a pleasing and practical solution. 
You will need to make three holes (about 
0.25 inch) in the circuit board (where 
marked) and some cutouts in the lid of the 
case. For the box suggested the cutouts 
should be as shown in the diagram. Now 
take a piece of cardboard and cut it to 
the size of the lid and make similar 
cutouts in that. 


Next the board should be bolted to the 
underside of the lid with the cardboard 
insulating the board from the metal and 
with the EPROM socket poking through the 


(o0-0o02Ó5U]UN-— 
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rectangular hole. Make sure that you use a 
all measurements in mm couple of the nylon washers on each screw 
on each side of the circuit board. 


Finally the lid should be screwed back 
onto the case with the two ribbon cables 
running out of the back, clamped between 
the lid and back. Now your BEEBUG EPROM 
Programmer is ready for action. In the 
next issue we will be listing а 


sophisticated program to drive the è 
programmer, to read, verify and program 
EPROMs. 

к 


Components List for BEEBUG EPROM Programmer 


No. Item Maplin No. Item Maplin 

code code 
1 27374 octal latch chip UB72P 1 reel 18 swg tinned wire BL12N 
1 TL497A DC to DC converter YY78K lm 20 way IDC ribbon cable XR74R 
1 1 ohm, 0.4W resistor MIR Im 26 way IDC ribbon cable XR75S 
8 1 Kohm, 0.4W resistor MIK 1 20 way DIL IDC socket FG84F 
1 1.2 Kohm, 0.4W resistor MIK2 1 26 way DIL IDC socket FG85G 
3 4.7 Корм, 0.4W resistor M4K7 1 50 hole x 36 strip stripboard FLÜ9K 
1 20 Kohm, 0.4W resistor M20K 1 plastic case LH66W 
1 330 pF ceramic capacitor WX62S 1 pack M4 x 12mm screws BF49D 
1 47 uF, 63v axial capacitor FB39N 1 pack M4 nuts BF57M 
2 12 mH open wound choke HX19V 1 pack nylon washers BF83E 
1 14 pin DIL socket BL18U 1 spot face cutter FL25C 
1 20 pin DIL socket HQ77J 1 reel solder FR21X 
1 28 pin DIL socket BL21X 


A 28 pin ZIF socket can be purchased instead of the 28 pin DIL socket. 


The resistors are identified by a code of colour bands. See the Maplin catalogue for an 
explanation of this. S] 


| HINTS HINTS HINTS HINTS HINTS HINTS HINTS, | 
MORE MEMORY - Douglas Siviter 
An extra 2K of memory can be gained by reducing the number of lines displayed in 4 
modes 4 and 5 to 25 (a usual number for other computers anyway). The following short 
program does this. HIMEM can then be increased by 2240 or the area used for a machine 


code program. The program works for modes Ü to 2 as well but in these cases you stand 
to gain 4480 bytes. Screen scrolling is slowed a little by this program. 


10 MODE 4 :REM USE WHICHEVER MODE YOU LIKE 
20 У0023;6,25;0;0;0; :REM SET 25 ROWS 

30 VDU23;7,31;0;0;0; :REM REPOSITION SMALL SCREEN 

40 VDU28,0, 25 13, 0 :REM TEXT WINDOW 

EM GRAPHICS ORTGINY 


FINDING FREE MEMORY - Richard Sterry 

The first free location in RAM is given by 256*?3+?2 and the last free RAM address 
by 256*?5*?4. So free RAM is given by 256*(?5-?3)+?4-?2+1. This accounts for variable 
Space, Basic stack, and screen memory and works with Basic I, II, and HiBasic. =] 
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Graphs provide much 
more striking displays 
than mere columns of 
figures. Chris Wragg 


e-TILDS- 


a scale factor to convert 
the data values to a screen 
value in the range @ to 20 
(the maximum height of a 
column in graphics charact- 
ers). From the highest and 
lowest values, а vertical 
scale is produced at the 
left of the screen. For 


st 


course 


describes a useful 
procedure for 


example, the call: 
PROCgraph("1985",0,50,24,4) 


would produce а bar-chart 


š converting your data with 24 columns in blue, 

Drawing Y with a vertical scale 

$ 1 into colourful running from @ to 50, and 

simple . with the title "1985", 

bar-charts bar-charts, and all in 

To display graphics 

mode 7. characters, а line of 

graphics colour codes is 


such a versatile mode that 
unless you need extra columns or really 
sophisticated graphics it is the obvious 
choice for many general purpose programs. 
As the example shows, some applications of 
graphics can work as well in mode 7 as in 
any of the so-called graphics modes. 


Mode 7 is 


The procedure listed here enables any 
suitable numeric data to be displayed in 
the form of a colourful bar-chart in mode 
7. For example, I use this procedure in а 
program which analyses the costs of runn- 
ing a car and displays graphically my pet- 
rol consumption over the last 16 fill-ups. 


DRAWING THE BAR-CHART 

The complete graphical display is 
generated entirely by the procedure called 
PROCgraph in lines 1100 to 1350. This is 
written so that it can readily cope with a 
variety of scales and up to 30 vertical 
bars or columns. The parameters required 
for the procedure are: 


titles A title for the display. 
low Lowest value on the scale. 
high Highest value on the scale. 
n$ Number of bars or columns. 
colours Colour of the bar-chart. 
Colour is a number in the range 1 to 7 as 


listed on page 223 of the User Guide. 


Since this is a mode 7 display, all the 
graphics are made up from suitable mode 7 
graphics characters. The procedure dis- 
plays first the title, and then calculates 
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run vertically up the screen in column 4. 
Any graphics characters displayed to the 
right of these will be in the colour spec- 
ified (see page 487 of the User Guide for 
more details of teletext colour codes). 


After these preliminaries, the main 
display is produced by the loop commencing 
in line 1240. Each pass through this loop 
draws one column of the bar chart. The 


bottom of every bar is formed from 
graphics character 163 (see User Guide 
page 489). This produces the horizontal 


line across the bottom of the graph. Then 
a vertical column is drawn using graphics 
character 181 with a height corresponding 
to the scaled value for that column. 


Third Graphical 


1200 


Fine adjustment takes place in lines 
1300 to 1320. The main graphics character 


used, code 181, is a vertical line 3 
pixels high (and 1 pixel wide). Graphics 
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characters 176 and 180 provide vertical 
lines 1 and 2 pixels high respectively, 
and these are used to top off each bar as 
appropriate and produce a more accurate 
result. To see the difference, just delete 
these lines from the procedure and re-run. 
This allows scaled values (in the range 0 
to 20) to be represented to the nearest 
9.3, rather than the nearest integer only. 


Finally, the procedure places a verti- 
cal line of 'green text' characters (code 
130) just to the right of the bar-chart. 
Any text then placed in this area is 
displayed in this colour (which you can 
change if you wish, or omit altogether). 


THE DEMONSTRATION PROGRAM 

The use of the procedure is demonstrat- 
ed by the complete program listed here. In 
turn, this reads one of four sets of data 
into the array Item(), and then displays 
the data in bar-chart form on the screen. 
Each data set starts with the number of 
items. Pressing any key will immediately 
move the display on to the next bar-chart. 


APPLICATION 

The procedure, аз already described, 
is quite flexible, and only requires that 
the data to be displayed be present in the 
array Item() before the procedure is call- 
ed. There are many applications where a 
simple bar-chart is more effective than 
rows of figures, and the illustration 


should convince you that mode 7 can be a 
colourful and striking 


good choice for 


10 REM Program CHART7 

20 REM Version Bl.1 

30 REM Author Chris Wragg 

40 REM BEEBUG Aug/Sept 1985 

50 REM Program subject to copyright 
60 : 

100 MODE 7 

116 DIM Item(30) 

120 N$-FNread 

130 PROCgraph ("First Display",10,15,N$ 


146 PRINTTAB (20,4)"You can use this";T 
AB(20,5)"space for text."; 

150 PRINTTAB(20,7)"If you are writing" 
;TAB(20,8)"very much, use VDU28";TAB (20, 
9)"to redefine the text";TAB (20,10) "wind 
ow." 

160 РЕТМТТАВ (20,16) "Press any key.";: 
=INKEY1 000 

170 N$-FNread 

180 PROCgraph ("Graph 2",0,100,N$,1) 
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190 А=ТМКЕУ1 600 
200 N$-FNread 
210 PROCgraph("Third Graphical Demo",5 
900,1200,N$,2) 
220 А=1МКЕУ1 000 
230 N$-FNread 
240 PROCgraph ("Fourth Demonstration", Ø 
3053.5, N$,4) 
250 END 
260 : 
270 DATA 12,13,12.8,13.1,13.4,13.4,13. 
7,14.0,14.1,14.0,14.3,14,7,14,9 
280 DATA 15,5,12,24,25,28,37,49,63,87, 
97,85,77,6V,45,43 
290 DATA 30,500,505,515,530,550,575,60 
5,640,680,725,775,830,890,955,1025,1100, 
1180,1190,1195,1190,1180,1165,1145,1120, 
1090,1055,1015,970,920,865 
300%рАТҺА-30,355,3:3533.2ұ2:05;2,9,2.76 
14202,2540, 2. 3902:2272.10,1,98, 1.87, 1:76 
,V266,1525671,.4741.38,1.30,1.22,1, 15, 1,08 
11.82, 96. 917 662 8252797419572, 
310 : 
1000 DEF FNread 
1010 LOCAL i$,n$:READ n$ 
1020 FOR 1%=1 TO n$:READ Item(i$):NEXT 
1030 -n$ 
1040 : 
1100 DEF PROCgraph (title$,low,high,n%,c 
olour$£) 
1110 CLS:PRINTTAB (0,0) title$; 
1120 LOCAL r,scale,X$,Y$,H,Hl 
1136 REM determine vertical scale 
1140 r-high-low:scale-20/r 
1150 REM display scale values 
1160 PRINTTAB (0,23) ; 1ow 
1170 PRINTTAB (0,18) ; low* (0.25*r) 
1180 PRINTTAB (0,13) ; low* (0, 5*r) 
1190 PRINTTAB (0,8) ; low* (0. 75*r) 
1200 PRINTTAB (0,3) ;high 
1214 REM set colour for graph 
1220 FOR Y$-1 TO 23:PRINTTAB (4,Y%) ;CHRS 
(145*colour$);:NEXT 
1230 REM draw bar chart 
1240 FOR X%=5 TO n$44 
1250 PRINTTAB (X$,23) ;СНВ$1 63; 
1260 H-(Item(X$-4) -low) *scale 
1270 REM draw column 
1280 IF H<l GOTO 1300 
1290 FOR Y$-1 TO H:PRINTTAB (X%,23-Y$) ;C 
HR$181; : NEXT 
1300 H1=H-INT (H) 
1310 IF НІ>.3 AND Н1<.6 PRINTTAB (Х%,22- 
INT (H) ) ;CHR$176; 
1320 IF Н1>=.6 PRINTTAB (X$,22-INT (H) ) ;C 
НВ$180; 
1330 NEXT X$ 
1340 FOR X$-0 ТО 23:PRINTTAB (n3+5,X%) ;C 
HR$1390; : NEXT 
"el 


1356 ENDPROC 
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Adding New OS 
Commands 


T.A. Lucas shows just how easy 
it is to add new commands and 
functions to the Beeb's operating 
system. 


THE BBC SYSTEM 

A very useful feature of the BBC 
microcomputer's operating system is the 
* command. If а * command such as *LOAD 
is issued from the keyboard, or from 
within a program, the text after the * 
character is offered first to the 
operating system. If the operating system 
(0.S.) recognises the command, it will be 
executed without being passed to any other 
part of the system. ТЕ the text after the 
* character is not recognised by the 
operating system, for example *XYZY, the 
text is offered to the paged ROMs. If 
none of these recognise the command, the 
operating system makes a call to the 
Operating System Filing System Control 
(OSFSC) vector with the accumulator set 
to 3. The filing system will then attempt 


to *RUN the unrecognised command. If the 
filing system cannot *RUN the file 
requested, the error "Bad command" is 


issued. Thus a * command may call ап 0.5. 
or DFS routine, another (sideways) ROM, or 
a disc-based routine. 


NT NG THE N 

For disc users this is a very useful 
and powerful feature. It enables machine 
code routines to be called from disc into 
memory only when they are needed. This 
means that the machine code can be already 
assembled, rather than needing assembly at 
run-time, and as a result the execution 
address does not need to Бе known by the 
calling program. Thus the routine can be 


changed or relocated without any need to 
change the call address in the main 
program. 


However, it may be desirable to have a 
machine code routine which is used 
frequently during execution of a program. 
The delay incurred in fetching the routine 
from disc every time is then unacceptable. 
A method is needed by which the program 
can be loaded from disc the first time it 
is called, and then held in memory so that 
it will be recognised the next time the 
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command is issued. Thus the routine would 
not need to be loaded from disc again. 
The program should conform to the 


following criteria: 


1. The command may be in upper or 
lower case. 

2. The command may be made as a 
* command, using the Basic OSCLI 
function available in Basic II, 
or using the operating system 
entry vector at OSCLI. 

3. A parameter list may be supplied 
after the call, provided it is 
Separated from the command by a 
space. 

4. The routine may reside in either 
the I/O processor or a second 
processor and be called from the 
second processor. 


The last feature is extremely useful 
as there is no other method of calling a 
machine code routine directly in the I/O 
processor from the second processor. 


If the code resides in the second 
processor, care must be taken to ensure it 
is Tube compatible. 


Since the routine is intended to be 
called from disc, one useful place to 
locate the code is at the top of the disc 
filing system area. Up to two pages are 
available in most circumstances from 
locations 81700 to &18FF. Alternatively, 
when a second processor is fitted, there 
is a large area of memory, from &1Е00 to 
&2FFF in mode 0, which may be used for 
one's own routines. It is not recommended 
that all of this is used because some room 
must be left for certain disc functions, 
such as *COMPACT and *COPY, to operate. 


RUNNING THE EXAMPLE COMMAND. 

As an example of this technique, the 
program given should be typed in and 
saved. When you run the program the 
routine is assembled and can then be saved 
on disc by copying the details of the 
*SAVE command produced by the program. 
Once saved in this way, the code can be 
called by any of the following methods: 


1. *DEMO «Parameters»? 
2. OSCLI("DEMO <Parameters>") 
- only available in Basic II. 
3. DIM P$ 255:$Р%="РЕМО <Parameters>" 
:X$-P$ MOD 256:Y%=P% DIV 256:CALL 
&FFF7 - using OSCLI vector. 
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first time the command is 
the program will be loaded from 

Start execution at label 
"ExAddr". This section of code will reset 
the value of OSHWM if necessary to ensure 
that the program is not overwritten by 
calls such as *COMPACT and *COPY. Тһе 
program then modifies the command line 
interpreter vector at locations &208 and 
&209. These are made to point to the new 
routine, having saved the previous 
contents of these locations. This is 
necessary to ensure that any * command not 
recognised by our new routine is passed 
back to the operating system or on to the 


The 


executed, 
disc and 


next routine. If the command 15 
recognised, the parameter list is 
interpreted. In the example given, the 


string following the * command is printed 
vertically on the screen (e.g. the command 
*DEMO BEEBUG will print 'BEEBUG' down the 
screen). 


When the command is issued again, the 
response is instantaneous because the 
command is now recognised as being in 
memory, and the routine does not have to 
be loaded from disc. 


ADDING YOUR OWN COMMANDS 


To add your own * commands into a 


program, you will need to delete the 
machine code following the label 
'.ThisCmd' in line 2000 up to line 8999. 


You should then put your own machine code 
between these lines and alter the name of 
the * command at line 100. A quick example 
will show you how to make the micro beep 
upon receiving the command *BEEP. 


l. Delete lines 2000 to 8999 by 
typing DELETE 20900,8999 

2. Change line 100 to: 
100 Name$-"BEEP" 

3. Insert your machine code: 
2006 .ThisCmd 
2010 LDA #7 
2020 JSR &FFEE 
2030 RTS 


Then RUN the program and the command 
*BEEP will now produce a noise. By saving 
the assembled code on disc (details are 
given by the program itself), the *ВЕЕР 
command could be used in any other 
load and execute the 


program, and will 


20 REM VERSION В0.4 


26 


30 REM AUTHOR Т.А. LUCAS. 
40 REM BEEBUG AUG/SEPT '85 
50 REM PROGRAM SUBJECT TO COPYRIGHT. 
60 : 
100 NameS="DEMO":REM Name for command 
and object file. 
110 OSBYTE=&FFF4 : OSWRCH=&FFEE: OSNEWL=& 
FFE7 
120 ZPage-&F2:CLIV-&208 
130 Start-&1900-8200:REM Allow 2 pages 
below DFS. 
140 PROCAssemble 
150 @%=&90А 


160 PRINT" *SAVE "Naimeo;'. ""Stargs" = ; 

P$;" FE'CExAddr;" FF"^Start : 
170 END I 
180 : 


1000 DEFPROCAssemble 

1010 Cmd=Start:REM Location of name of 
command. 

1020 SCmd=Name$ 

1030 FOR Pass$-0TO3STEP3 

1040 P%=Start+LEN (Мате$) 

1050 [ОРТ Pass$ 

1060 .NewCLI STX ZPage:STY 2Раде+1\ Sav 
e pointers to command. 

1070 LDX $0:LDY #0 

1980 JSR FetchCharN Skip any spaces. 

1090 СМР #&2А:ВМЕ C 

1160 INY:JSR FetchCharN Skip "*" charac 
ter. 

1118 .CompCmd LDA (ZPage),Y:AND #95 

1120 CMP Cmd,X:BNE NotThisCmd 

1130 INY:INX:CPX #LEN (Name$) 

1140 ВСС CompCmdN Test full length of n 
апе. 
1150 LDA (ZPage),Y:CMP #13:BEQ ThisCmd\ 

At end of command. 

1160 INY:CMP #32:BEQ ThisCmd 

1176 .NotThisCmd LDX ZPage:LDY ZPage*l 

1180 JMP (OldCLIV)N Try next routine. 

1196 .FetchChar LDA (ZPage),Y:CMP #32 | 

1200 BNE ExitFetchChar 

1210 INY:BNE FetchChar\ Skip spaces. 

1220 .ExitFetchChar RTS 

1230 .OldCLIV NOP:NOP\ Store for old ve 
ctor 

1240 .ExAddr LDA CLIV:STA OldCLIV 

1250 ГОА CLIV+1:STA O1dCLIV+1\ Save old 
vector. 

1260 LDA #NewCLI MOD256:STA CLIV 

1270 LDA #NewCLI DIV256:STA CLIV+1\ Set 
up new vector. 

1280 TYA:PHA\ Save command offset. 

1290 LDA #180:10Х #@:LDY #255:JSR OSBYT 
EN Fetch OSHWM. 

1300 CPX #(ExAddr DIV256)+1:BCS OSHWMSe 
t\ Test if routine protected. 


1319 LDX #(ExAddr DIV256)+1:LDY 30:JSR 
OSBYTE\ Set new value for OSHWM. 
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1320 .OSHWMSet PLA:TAY\ Restore pointer 2070 PHA\ Save tab position. 
2080 LDA #9\ Cursor forward one charact 


1330 : er. 

2000 .ThisCmd TYA:PHAN Save pointer to 2090 .SetTab JSR OSWRCH 

command parameters. 2100 DEX:BNE SetTab 

2010 LDA #134:JSR OSBYTEN Fetch cursor 2110 PLA:TAX\ Restore X register. 
position. 2120 .TabSet INY:BNE Display 
2020 PLA:TAYN Restore pointer. 2130 .ExitCmd RTS 

2030 .Display ГОА (ZPage),Y:CMP #13:BEQ 9000 ] 

ExitCmd 9010 NEXT 

2040 JSR OSWRCHN Display character. 9020 ENDPROC 

2050 JSR OSNEWL i] 
2060 TXA:BEQ TabSet\ Test for tabbing n 
eeded. 


DECIMALS TO FRACTIONS - Jonathon Wilson 

The short program below takes as input a decimal number (e.g. 1.125), and outputs 
the lowest common denominator fraction (9/8 for the example above). Note that values of 
zero will produce the response 'Silly'. 


10 INPUT"Decimal "D:T$-D*lE7:B$-1bE7 

20 REPEAT READC$:1F (T$MODC$-0) AND (B$MODC$-0) T$-T$/C$:B$-B$/C$:RESTORE 
30 UNTIL С%-97:ІЕ T$-0 PRINT "Silly" ELSE PRINT "Fraction ";T$;"/";p$ 

40 DATA 2,3,5,7,11,13,17,19,23,29,31, 37, 41,43,47,53,59,61,67,71 , 473, 97 


INVISIBLE BOOTS - Paul Baron 
If you don't like your !BOOT files to write PAGE-&1900 and CHAIN"MENU" all over the 
nice clean screen, here is one method of preventing it. When *BUILDing the file, create 
the first line as XXXXX. Now use a disc sector editor such as in Disc Doctor, Watford 
DFS or BEEBUG Vol.2 No.3, to alter the Xs to the hex values: 
1c 01 07 01 07 
These are the VDU codes to create а zero sized text window. Ав it is the codes 
themselves that are used, nothing appears on the screen. The first thing that the menu 
program (or whatever) should do is to change the mode or text window, otherwise all 
Screen output will remain invisible 


SWITCHING DISC DRIVES. - Alan Webster 
This function key definition will set up one of the function keys to switch between 

disc drives. Pressing the key chosen (according to the value substituted for 'n') will 
Switch over to the next drive until drive 3 is reached when a further key-press will 
bring you back to drive Ø again. Keeping the Tab key down at the same time will give а 
catalogue of that drive. This routine will only work with Basic II because of its use 
of the OSCLI command. 

16 *KEYnDIM X% 6,5% 12:X$?0-0:X$!1-25$:X$15-71:A$-6:Y$-X$DIV256:CA.&FFD1 :0%= (ЗА. ( (5321 
) +1) ) :0SCLI ("DR. "*STR$ (D$) ) &P.CHR$12"Drive ";D$:IFINKEY (-97)0SCLI (".") |М 


UNDERLINING CENTRED TEXT - I 


Wordwise just prints spaces before a piece of text, to centre it. If your printer's 
underline feature is being used this usually results in these spaces being underlined 
as well. To underline just the text, place a 'white' code followed by a space and then 
a 'green' code between the centre command and the underline command. For example: 


The following function key definition will help you to define text windows. Press 
fø, move the cursor, using the cursor keys, to the bottom left hand corner of the 
window required, press Return, move to the top right corner, press Return again, and 
the correct VDU28 statement is printed out. 

*KEY@X=POS : Y-VP. : G-GET: P-POS: V-VP. :V. 31 , P, V, 46: G-GET: W-POS : Z-VP. : V. 31 ,W,Z,46,31,X,¥ 
4p, “VDUZE таратыу; ин; ЕЯ |L|M ses] 
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Title : Battlefields 
бар бан : BBC Soft 


: £9.95 
Reviewer: Mike Williams 
Rating : ++ 


I have just met my 
Waterloo, or to be more 
precise, I have been re- 
playing the battle of 
Waterloo, one of two 
campaigns simulated in 
the new Battlefields 
package from BBC Soft. 


n e : Repton 


The other simulation included is based 
on the American Civil War. Both are games 
for two players, who control the opposing 
forces, and each game is likely to last аз 
much as two hours. I was unable to load 
the Civil War game so concentrated on 
Waterloo, though in general terms both 
games are similar. 


Each player in turn is (secretly) 
presented with the dispositions of his 
various commanders and their latest 
intelligence reports. A map of the battle 
area is then displayed showing the 


If you manage to do so, then you are 


tl 
55 иа: bere Software elligible to win the £100 prize for the 


: £9.95 cass. 

£11.95 disc 
Reviewer: Alan Webster 
Rating : xxx 


Repton is а multi- 
level arcade adventure 
set in an underground 
cave. The object is to 
complete all 12 levels 
without losing any lives. 


Supplier:  Sotware Projects 


: £7.95 
Reviewer: Geoff Bains 
Rating :х 


Software Projects is 
a company comparatively 
new on the Beeb scene 
making а name for itself 
by converting its old 
Spectrum classics to work 
on the BBC micro. If the 
company has many more 


но ones rusa 

plier : Icon Software 
Price : £1.95 
Reviewer: Alan Webster 
Rating :4« 


Drain Mania is all 
about eliminating the 
horrible bugs, viruses, 
and other nasties that 
roam the drains! You con- 
trol a little man whose 
task is to rid the under- 
world of these pests. 


first to achieve this goal. 


The game involves solving a set of 
problems so that you can collect all of 
the diamonds within a set time. To hamper 
you, there are one or more reptiles which, 
when hatched, chase you to an almost 
certain death. 


The screen displays 1/l6th of the 
playing area of any level. You can move in 
any one of four directions, and the game 


tricks like Crypt Capers up its sleeve, 
then the name it makes will likely be a 
less than complimentary one. 


This game smacks of conversion. Even 
the loading instructions are wrong (you 
try and find the ‘earphone socket' on your 
Beeb!). Games of this standard, though 
applauded in their time, have long since 
failed to compete with the best of today's 
current offerings. It is certainly no way 
to establish a good reputation. 


The action takes place in the Pharo's 


Moving the man is a little difficult 
to get used to as he has a momentum of his 
own, and does not always respond 
immediately to changes of direction. 


Drain Mania is a multi-level game with 
a nice interrupt-driven tune which plays 
while the game is being loaded. There are 
instructions within the game, and you are 
allowed to define your own keys. Apart 
from these touches, the rest of the game 
is fairly standard. 


The scenario is a set of platforms 
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locations of his own forces, and those of 
any enemy units sighted, and the player 
then gives his orders to his commanders. 
Fighting takes place when opposing forces 
meet, with results based оп the relative 
strengths of the units involved. 


If you're into history and prepared to 
spend the two hours or so to play one of 
these games, this package may be of some 
interest. I felt that a good idea had been 
lost in а mediocre implementation poorly 
presented. Oh, by the way, history got it 
all wrong. In my version Napoleon won! =] 


features an excellent 4-way scroll. The 
problems set by this game are quite 
challenging and can be very tricky to 
puzzle out. А good feature of this game 
allows you to start on any level, once you 
have the appropriate password, obtained by 
completing the previous level. 


To enter the competition, you must get 
from level 1 to level 12 in one sitting, 
and with only four lives, much harder than 
completing each level separately. Overall, 
Repton is well worth buying, with the 
added chance of winning £100. =] 


14.88 hours 
on 16 June MM Mi ME 
W2 Wi 88 El E2 


Orders for 
: SW $1 SE 


Welling 


(their spelling) pyramid. You have to 
chase around the various maze-like rooms, 
picking up objects and avoiding or 
shooting the fireballs, ghosts, snakes, 
and so on, striving to reach the next 
chamber - a kind of ancient Egyptian 
Pacman, but without the cute and cuddly 
characters. 


To say that Crypt Capers is boring is 
opinionated, but to say that the controls 
are slow reacting, the backgrounds 
unimaginative, and sound effects poor is 
all fact. зге) 
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with drain pipes at the top and bottom of 
the screen. You have to 'skate' about the 
screen, collecting money dropped down the 
drain while hitting the bugs as they 
lethargically make their way from top to 
bottom. After the second screen there is a 
bonus sheet with lots of money to be 
collected in a set time. 


That description really says it all. 
This is not one of Icon's better games, it 
lacks excitement and challenge, and after 
a few goes has little more to offer even 
tne most avid games player. == 
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BULLETIN BOARDS 
The Latest 


Peter Rochford brings you up to 
date with the latest happenings 
on the communications scene, in 
particular the growth of bulletin 
boards using viewdata 
standards. 


Since we last took а look at bulletin 
boards (BBs) in BEEBUG (Vol.3 №.5), the 
Scene has changed quite markedly. The 
number of dial-up boards now operating in 
the UK has risen to well over 100 and the 
regular updates in the BEEBUG supplement 
illustrate that this growth is continuing 
at a steady rate. 


What is of great interest is that many 
of the new boards are now opting for a 
faster baud rate of 1200/75 instead of 
300/300, and use viewdata standards the 
same as Prestel. This has come about due 
to the availability of low-cost packages 
such as the Communitel system, allowing a 
local viewdata service to be set up ona 


BBC micro. 
Communitel is available for around 
£325 and includes the necessary hardware 


and software for use with a BBC computer 
and twin 80 track drives. The resultant 
system can provide 200 frames for 
retrieval, and has frame editing 
facilities and the ability to convert 
files to СЕТ format for telesoftware 
downloading, the same as used on Prestel 
and Micronet. The system can be further 
expanded to give a larger number of frames 
by using a hard disc. 


Pace, well known for the Nightingale 
modem and Commstar ROM, is, at the time of 
writing, planning to release bulletin 
board software, again for the BBC micro. 
This will be cheaper than the Communitel 
system but I understand will not be 
viewdata standard, although it will 
provide colour. 


like the Beeb is set 
important part of the 
scene at the transmitting 


So it now looks 
to become an 
bulletin board 


_ 80 


end of things. Up until now the favourite 
machine has always been the Tandy TRS 80 
model 4, due of course to the fact that 
this is а popular machine in the USA and 
most of the software available for running 
BBs came from there. 


Another package that offers viewdata 
standards is the Metrotel system. This is 
rather more expensive than Communitel at 
£1700 and runs ona Torch computer, a 
machine that has close family ties with 
the BBC micro. 


There is no doubt about it that 
viewdata, with its colour and graphics, is 
far more attractive to use than boring old 
black-and-white. Also, the ease of use of 
viewdata with its single-key selection of 
pages from menus makes it very appealing. 
This is certainly not true of many of the 
300 baud systems which are far from user- 
friendly and require you to remember many 
commands or have a 'help' sheet hand 


PRESS NUMBER FOR INFORMATION REQUIRED 


. ELECTRON. 
.FOR PEOPLE WITH SPECIAL NEEDS. 
. SOFTWARE INFORMATION. 


DONAUS UN = 


шаа ед 


This user-friendliness of  viewdata 
systems coupled with the attractiveness of 
colour and graphics has made it ideal as a 
medium for selling services and products. 
Within the Prestel database we now have 
homebanking and tele-shopping, plus a host 
of on-line information services. 


Outside of Prestel, several district 
councils such as Hackney and Northampton, 
have allotted areas on their mainframe 
computers for free access by local res- 
idents with viewdata terminals. These show 
details of council services and amenities, 
plus information on local events etc. 


Beeb owners will be pleased to know 
that Acorn have at long last set up their 
own free dial-up information service for 
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customers. This is a multi-user system 
running on several BBC micros linked by an 
Econet file server and using a hard disc 
for frame storage. The system uses the 
Communitel software described earlier and 
shows details of all the products marketed 


by Acorn Computers. Well worth a look I 
might add. 
Retailers have also seized upon the 


possibilities of a dial-up information and 
ordering service. Technomatic, who specia- 
lise in BBC micros and peripherals, have 
just installed their Communitel system and 
can be accessed 24 hours a day to check 
the availability of stock and even place 
orders using credit cards. This can be a 
great boon to the consumer who can check 
Stock and prices out of shop hours and, of 
course, releases the staff of a shop from 
answering price queries on the telephone. 
I look forward to Watford Electronics with 
their permanently engaged phone lines, 
installing theirs (multi-user of course)! 


Current users of Prestel and Micronet 
will probably know already of the Micro- 
gnome section on the Viewfax 258 pages 
which features news and gossip about the 
micro scene. This is run Bob Clark of 


nome at Home 


Г 
$ 


ME 
ІР 


Soft Machinery, a company closely involved 
with the writing of communications soft- 
ware. Bob Clark has now set up his own 
database from home called 'The Gnome at 
Home'. This again uses the Communitel 
system and Econet file server оп several 
Beebs plus hard disc for storage. This 
System is shortly going multi-user with 1% 
lines, and with a further 20 at a later 
date. Most welcome this, as one of the big 
problems with private boards is that only 
one user may access it at one time. There 
are plans afoot to implement multi-user 
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Gnome board and to include 


games on the 
telesoftware too. However, I have a 
feeling that all these goodies will not be 
provide free of charge forever, and that a 
subscription, and advertising, may be used 
to make the service pay. 


There is one section on Prestel that is 
now becoming extremely popular, and if you 
haven't looked at it yet then please do. I 
refer to the Timefame section starting on 
page 8181. This provides several bulletin 
boards that deal with specific interests 
and subjects. You send in your comments 
and ideas on а response frame and it 
appears for everyone's viewing several 
minutes later. This continues all the time 
the board is open and frames are over- 
written as new ones are sent. There are 
many sections for such things as political 
comment, TV and video, 'Fizz' for graffiti 
and most important to me, Microboard. 


Microboard is dominated I might add by 
owners of BBC computers and a recent 
survey quoted 70$ of users as Beeb owners. 
You can put up your questions on any 
aspect of computing for others to see and 
you will find that you will always get 
answers either on Microboard or direct to 
your Prestel mailbox from other users. 
Don't ignore this section if you are on 
Prestel. In fact I would go so far as to 
say that it is worth the £5 a quarter 
Prestel charge just to use Timefame. 


So there we are. Things are getting 
very exciting on the comms scene with the 


growth of viewdata services provided by 
Prestel апа other organisations, апа 
indeed, private individuals. You as a BBC 


owner are well equipped to take advantage 
of all this with the Beeb already support- 
ing viewdata standards via its mode 7. All 
you need is а 1200/75 baud modem, which is 
becoming increasingly cheap, and some ter- 
minal software. Don't wait - communicate! 


Phone numbers of UK bulletin boards are 
featured regularly in the supplement with 
frequent updates and additions. Viewdata 
Services referred to in the text: 


Hackney B.C. 901-985-3322 
Northampton B.C. 0604-20441 

Acorn 0223-243642 
The Gnome at Home #01-348-3274 
Technomatic 01-450-9764 


Prestel/Micronet 01-618-1111 
(Other numbers outside London 
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Surac pursues his quest for efficient programming by showing how so- 
called look-up tables can be used to speed up further a variety of 
mathematical functions, including those so often used in graphics. 


Last month we looked 
at one way of speeding-up 
BBC Basic's calculations 
of sines and cosines. It 
was much faster than the 
computer's built-in rou- 
tines, but only worked 
when the angles increased 
at steady rates. 


We'll now go on to a 
way of using tables, or 
arrays, to speed things 
up. The approach means 
that a function's value 
can be looked up direct- 
ly, rather than calcula- 
ting it whenever it is 
needed. We can use tables 
to replace either spec- 
ially written Basic func- 
tions or the computer's 
"intrinsic" functions 
(e.g. SIN, EXP and LOG). 


Let's look at an easy 
example. Statistical work 
often needs to calculate 
factorials (for example 
41-4%3%2%1), It's easy 
enough to write a func- 
tion to do the job, but 
then every one must be 
calculated whenever it's 
needed, which could slow 
things down quite a lot. 


A different approach 
is to fill an array with 
all possible factorials. 
The procedure fills the 
array "Fact(33)" with the 
factorials of all 
integers from @ to 33. By 


definition, @! has the 
value "1", while 33! 
(value 8.6833E36) is the 
largest factorial the 
Beeb can handle. Run the 
procedure once at the 


start of your program and 
then, whenever you need a 


factorial, use the value 
from the array. For 
instance, the number of 
permutations Of - "pe" 


FACTORIALS 
DEF PROCfact 
DIM Fact (33) 
LOCAL i$ 
Fact (0) =1 


FOR 1%-1 TO 33 
Fact(i$)-Fact(i$-1)*i$ 
NEXT 

ENDPROC 


items from a total of "N$" is: 
Fact (№) /Fact (№-Р%) 


As an example of the speed 
improvement, it takes about 25.5 secs to 
calculate 500 random factorials directly, 
while using the table method takes only 
1.0 secs, including setting up the table 
in the first place. The more factorials 


you need, the greater the advantage, but 
tables are quicker with as few as 4 
calculations. 


You are not just limited to your own 
routines, however - tables can replace, 
for example, trig functions. It's a little 
more complex than factorials though, and 


TRIG FUNCTIONS 
DEF PROCanginit 
DIM Ѕіпёар (90) ,Tantab (90) 
FOR I$-0 ТО 99 
Sintab(I$)-SIN (RAD (I$) ) 
Tantab (I$) =TAN (RAD (I$) ) 
NEXT 10060 ENDPROC 


DEF FNsin (ang) 

LOCAL sign 

sign=SGN (ang) 

ang-ABS (ang) MOD 360 

IF ап4>180 THEN sign--sign: 


ang-ang MOD 186 
IF ang»90 THEN ang=18%-ang 
=Sintab (ang+¥.5) *sign 


DEF FNcos (ang) 
=FNsin (angt+99) 


DEF FNtan (ang) 

LOCAL sign 

sign=SGN (ang) 

ang-ABS (ang) MOD 134 

IF ang»90 THEN sign--sign: 
ang-180-ang 
-Tantab(ang*0.5)*sign 
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needs a function to extract the data (if 
all angles are to be catered for) as well 
as a procedure to set it up. 


PROCanginit sets up tables of sines 
and tangents for single degree steps from 
0 to 90 degrees. Once that's done, you can 
get the trig values for any angle 
whatsoever by using the fact that trig 
functions repeat themselves in a totally 
predictable way. For instance: 


sin(-A)--sin(A) 
sin (A)=sin (A-360) 
sin (А) =-51п (A-180) 


FNsin uses relationships like these to 
get the sign and equivalent value, in the 
range 0 to 90 degrees, of any angle. It 
then extracts the sine of the equivalent 
angle from the array Sintab(), negates it 
if it has to, and returns the value. 
Calculating cosines is much easier, 
because cos (A) "sin (A*90) . 


FNTan works in much the same way, 
reducing the angle to its equivalent in a 
fixed range, plus its sign. 


These functions do not nave the 
tremendous speed advantage of the 
factorials, but are still worth using. For 
instance, 500 random SINs take 12.5 secs, 
and TANs 22.2 secs, while the equivalent 
FNsin and FNtan take 7.5 secs and 6.45 
secs respectively. Try them in the Polar 
Curves program from May's BEEBUG (Vol.4 
No.1). In addition, by performing most of 
the calculations first, any subsequent 
graphics appear much smoother and faster. 


doing a lot of trig 
calculations, savings like this are well 
worth while but, inevitably, there is a 
price to pay. The procedures and functions 
take up memory, while Sintab() and 
Tantab() between them need over 900 bytes. 
You must allow for the time to run 
PROCanginit, so you have to be calculating 
at least 200 values before there is any 
overall speed advantage. Finally, the 
functions only give values for integer 
angles. Although you can put in fractions 
of a degree, they are rounded to integers 
first. For example, FNsin(l.5) actually 
returns Sin(2.0). This gives a maximum 
error of around 0.0087, which is normally 
insignificant. 


If you аге 


why didn't I 
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calculate tangents by 


ERRAT ESS NE a BR S E аа ала е о и SR ES SA PREY E aa TTL. SA 


using FNsin(ang)/FNcos (ang)? Try it, prr 
time it, and see! 


When using tables for 
functions, the arrays only need holaf 
a limited range of values, because Ee: 
the functions are cyclic. We can леп ГГ 
use this range to get the value forL| 
any possible angle. Many other 
functions are not symmetrical, and we[ | 
need a different approach. Е 


In such cases, set up the table for the 
most likely range of values, and use the 
normal Basic function for values outside 
that range. For example, suppose we 
normally need to use EXP on values from -5 
to *5, but may have to handle any value. 


EXPONENTIAL 
DEF PROCexpinit 
DIM Ехр (199) 
LOCAL val$ 
FOR уа1%=-50 TO 50 
Exp (уа1%+50) =ЕХР (уа1%/1й0) 
NEXT 
ENDPROC 


DEF FNexp(val) 

LOCAL ex 

IF val&-5 OR val>+5 THEN 
ex-EXP(val) ELSE 
ех=Ехр (уа1*14+50.5) 


=ех 
PROCexpinit sets up а _ 19@-element 
array for the values of ЕХР(п) for n 


between -5 and +5, іп 0.1 steps. FNexp 
returns EXP(val); if "val" is outside the 
-5 to +5 range, it uses the usual EXP 
function. Usually, however, it scales 
"val" to the range (0-100, extracts the 
value from the table, and returns that. 
The "50.5" term rounds the index to the 
nearest 0.1 step to reduce the errors. 


You are not, of course, limited to 
using tables for just these functions, but 
can use them in many other cases. I've 
shown you different ways in which you 
might have to extract the data from the 
tables and you can pick'n'mix the methods 
for any particular case. The trick is to 
identify the range and step-size of the 
function, fill a suitable array, and write 
a function to pull out the right data. 


Demonstrations of all routines listed 


are included on the magazine cassette/disc 
including the modified 'Polar Curves'. З] 
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eTILlüR-C 


Looking at Data 
Structures (ear 1) 


Sooner or later every 
programmer encounters 
problems of how best to store 
data. Paul Ganney introduces 
the subject of data structures 
and describes how to implement 
some of the more useful 
techniques in this the first of two 
articles. 


At some point in the construction and 
development of your programs, you are 
going to, run into a familiar problem: what 
to do with the data. You may decide to use 
a FOR-NEXT loop, reading data items one at 
a time, and use them there and then. But 
what if you want to use items more than 
once? What if you don't know the order in 
which the items will be required? What if 
you wish to insert new items and delete 
old ones as the program proceeds? Data 
structures provide the answers to these 
and other questions. So let's start by 
finding out what is meant by the term 
‘data structure’. 


A data structure defines how data is 
to be stored and how the individual items 
of data are to be related or located, if 
at all, in a way that it is convenient for 
the problem in hand and easy to use. For 
example, you could hold all your data on 
index cards and search them yourself for 
any information you require, but it would 
be better to hold it all on tape and let a 
computer do the searching for you. It 
would be better still to hold it on disc, 
where an item of data can be accessed 
("got ағ!) without having to read all the 
other items first. 


ARRAYS 
An array is the simplest form of data 
structure, and exists as a part of most 


high level programming languages, BBC 
Basic included. An array is simply a 
collection of similar data items, one 


after another, referred to by the same 


identifier (variable name). Different 
items within the array can be referenced 
by means of a number, called the index, 
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which is an item's position in the array. 
There is no direct connection between the 
"value" of a data item and its position. 


USING ARRAYS 

By using arrays in loops we can often 
save on programming time and produce 
shorter programs. This is shown in the 
following (rather trivial) example which 
inputs a series of letters and then prints 
them out in reverse order: 


10 REM Array example - P.S. Ganney 
20 CLS:INPUT"How many letters " N$ 
30 DIM Letter$ (№) 

40 PRINT'"Input the letters:"' 

50 FOR I$-1 TO № 

60 Letter$(I$)-GETS$ 

70 PRINT Letter$ (I$) 

80 NEXT I$ 

90 PRINT''"In reverse:"' 
100 FOR I$-N$ TO 1 STEP -1 

110 PRINT Letter$ (I$) 

120 NEXT I$:PRINT 

130 END 


On the BBC micro, the array automatically 
starts at index @ (although not used in 
this example), so that Letter$ actually 
has №+1 elements in it. 


HIGHER DIMENSIONS 


The type of array we've considered so 
far is known as a one-dimensional array, 


or vector, but two, three and more 
dimensions are quite feasible. A 
two-dimensional array, or matrix, can be 
thought of as a table with rows and 


columns. A three-dimensional array can be 
thought of as data items in a cubic 
structure. Fourth and higher dimensions 
are best just used, not worrying about a 
geometric interpretation. 


INDEX DATA ARRAY INDEX ARRAY 


5 
8 
16 


2 


0 
1 
2 
3 
4 
5 
6 
ГА 
8 
9 


жей; 
о 


Fig 1 Example of ordered data using an index array 
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INDEX DATA ARRAY 
5 
8 

16 


POINTER ARRAY 


men] 


0 
1 
2 
3 
4 
5 
6 
7 
8 
Li 


4 
START POINTER 


(7-1 TERMINATER) 


Fig 2 Example of ordered data using a pointer array 


Higher dimensions allow you to keep 
related items of data together. For 
example, a list of prices and a list of 
corresponding discounts could be held in 
two arrays, Price(N%) and Discount (№), or 
held in a single two-dimensional array, 
Item(N%,1). Then Item(i$,0) would give the 
price, and Item(i$,1) would give the 
discount, for the item in position i$ in 


the list. The one point to remember in 
combining such lists into two (or more) 
dimensional arrays, is that the data 


stored must be all of the same type 
(string, real or integer). 


Consider again the three questions 
posed at the start of this article. Arrays 
provide answers to the first two, and a 
partial answer to the third. The problems 
arise when the items within the array are 
to be kept in an order. Inserting an item 
at a specified point in ап array 
necessitates moving all the other items 
'below' this point 'down' one location, 
and deletion involves moving 'up' one 
location. Consequently, they are often 
used to hold information that either 
changes rarely or never alters in order. 


INDEXED ARRAYS 


Two possible solutions present 


themselves. Firstly, to provide an "index" 


array in much the same way as Indexed 
Sequential Files (see BEEBUG Vol.2 №.4), 
i.e. each element in the main data array 
has a corresponding number in the index 
array, which gives the data item's 
position. Ordering the data items now 
involves just ordering the index (as 
described in more detail in the BEEBUG 
Workshop for Vol.4 No.1). The idea is 
shown in principle in Fig. 1. Insertion 
and deletion here also necessitates a 
great deal of movement of items, albeit 
those of the index array only (a great 
saving if several arrays are being used, 
one per field (part) of each data item). 


For example, if the names, reference 
numbers and prices of a series of stock 
items (maximum N%) were to be held in 
three arrays Stock$(N$), Ref(N%) апа 
Price(N$), then considerable shuffling of 
data would be involved every time a stock 
item was added or deleted from the list, 
assuming that this is kept in order (say, 
alphabetically Бу name). This could be 
reduced by having an index array, arranged 
in alphabetical order by name, pointing to 
the data items. Additions and deletions 
would now only involve moving the index 
pointers. 


We could also have more than one index 
array, one which keeps the stock items in 
alphabetical order by name, and one which 
keeps the stock items in reference number 
order. This arrangement means that а set 
of data items can effectively be 
maintained in two or more orders 
concurrently with no need for frequent 
re-ordering. Individual items can be 
located using the  'Binary Search' 
technique (see Workshop Vol.4 No.2), in 
the example searching either by name, or 
by reference number, as required. 


With such a method, insertions are 
merely added to the ends of the data 
arrays (or inserted in any free space) and 


entries inserted into the index arrays at 
the appropriate points. Similarly, dele- 
tions merely require that 
the index entry (or 


entries) Бе deleted (and 


Ре 


о [rt 


Ес 


other pointers moved up). 


START 
POINTER 


D: DATA 
P; POINTER 


FREE SPACE 
POINTER 


Fig 3 Physical and logical orders 


Beebug August/September 1985 


-1; TERMINATER 


It is not necessary to do 


anything to the data 
arrays unless we want to 
mark the deleted data 
positions as being 
re-usable. 
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Fig4 Insertion in a linked list 


LINKED LISTS 

The second method also involves a 
second array, this time one of 'pointers'. 
For each element in the data array there 
is an element in the pointer array which 
gives the index of the next item in order, 
thus pointing to it (see Fig. 2). 
Obviously, this can only work for 
l-dimensional arrays (unless the pointer 
is only needed to point to a row or 
column). Insertion and deletion is greatly 
simplified as we shall see. The principles 
of linking data items by pointers gives a 
data structure known as a ‘linked list'. 


With ап array structure in its 
simplest form, the logical structure 
(which item follows which) is exactly the 
same as its physical structure (which item 
is stored after which). This need not 
always be the case, “ав - Fig. 3 
demonstrates. A linked list is an abstract 
data structure in which it is extremely 
unlikely that the physical and logical 
Structures will ever be the same 
(exception: when the list is empty). 


Each item in a linked list consists of 
two parts: the data itself, and a pointer 
to the next item in the list. In addition, 
two further pointers must be set up, and a 
third defined: one to the first item in 
the list (the start pointer), and one to 
the next free storage space (the free 
space pointer). А null 
pointer (or terminator, 


BEFORE 


+ о [P o P| — 


ЖЕН РЕЯ 


Fig5 Deletion т a linked list 


The greatest strength of a linked list 
is in its flexibility. Inserting and 
deleting items is incredibly quick and 
easy to perform. Consequently, linked 
lists are generally used for applications 
where data changes often. 


USING A LINKED LIST 


Insertion or deletion is simply a mat- 
ter of adjusting pointers (see Fig. 4 and 
Fig. 5 respectively, but note that these 
diagrams represent the logical rather than 
physical structure of the list). After а 
few insertions and deletions, the list 
will spread through store, with deleted 
items lying physically between items still 
in the list. These are collected together 
to form another linked list, of free data 
items. Storage space for new items is 
taken from this free space list, and that 
gained from deletions is given to it. 


Returning to our previous example of 
Stock items, we have a further complica- 
tion if we want to use linked lists, as we 
want to link the data items in two 
different sequences, one alphabetically by 
name and one in reference number order. We 
can do this by associating two pointers, 
called Pl and P2, with each set of data, 
as in Fig. 6, where Pl pointers link the 
items in alphabetical order and P2 point- 
ers link the items in reference number 
order. Two start pointers are now needed, 
and the free space list can use either 
pointer (in this case Pl is chosen). 


[То be continued next issue. ] зә) 


i.e. а pointer to no- 


Эрн БЕ 


+ 


22; 2 


where) must Бе defined, 
to indicate the end of 
the list. An empty list 
is indicated by а ter- 
minator in the start 
pointer, and a full list 
by a terminator in the 
free space pointer. 
. 36 
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Fig6 Example of a doubly linked list 
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Swimming around in my 
fish-tank this month are 
adventures from Robico Software. 


two text 


ISLAND OF  XAAN from Robico Software, 
3 Fairland Close, Llantrisant, Mid 
Glamorgan. Cassette £7.95 Disc £9.95. 


As the mist cleared I found myself in 
a windowless dungeon without so much as a 
rat for company. With more than a little 
difficulty, I finally emerged to find a 
slumbering guard who could teach my dragon 
a thing or to about light sleeping. Any 


movement on my part resulted in him 
launching himself from his cot and 
separating my head from shoulders. 


*LOOK 


You are in a small, dimly lit prison 
cell, filled with the stench of death 
and decay. The smooth, granite walls 
seem to close in on you, windowless 
and menacing! To the north looms a 
huge, iron door. 

The door is closed. The only visible 
exit is north. 

You find an alcove 


ЗЕХӨМІМЕ CHAIN 

The chain is fashioned from iron, its 
heavy links encrusted with rust from 
ages past You find nothing 

EXAMINE ALCOVE 


You 


The alcove is nothing special. 
find nothing. 


» 


When, and if, you manage to pass this 
kindly soul you will find the many paths 
which criss-cross the island. Хаап is 
littered with jewels, shovels, beggars and 
the Hog in the Dark - which bites! The 
game accepts two word commands which will 
lead you through 180 locations before you 
find enough treasure to buy yourself a 
passage to freedom. 


This is а traditional adventure which 


is very similar in style and format to the 
early EPIC range (e.g. Castle 
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by Mitch 
ADVENTURE GAMES ADVENTURE GAMES 


haunted 


Frankenstein). Acres of text have been 
compressed into this game and used to good 
effect. A teleprinter, which is to be 
found іп the middle of a deserted plain, 
curtly informed me to go away as it is 
Sitting there feeling surrealistic. Hands 
up all those who have never heard of Dali! 


I have returned to this game every 
night for a week, convinced that tonight I 
will find the limits of the island, and so 
far I am still mapping! What began as an 
irritating game is becoming ап obsession 
as I am beginning to realise how much has 
been shoe-horned in. I have found so many 
objects to store and manipulate I'm 
becoming bemused. This game certainly has 
hidden depths in which you will wander for 
many an hour. Very professional... 


ASSASSIN also from Robico Software. 
Cassette £9.95 Disc £11.95. 


This adventure takes place in a world 
of intrigue, double-cross апа аѕѕаѕѕ- 
ination - not unlike the BEEBUG office! 


Quickly slipping into my gumshoes and 
dark glasses, I entered the game by the 
side entrance and merged with the shadows. 
It appears that my mission is to blow away 
some wise guy who is causing trouble for 
the front office. As my previous contract 
was as a hit-man for the Brownies, this 
job should be a sneeze! 


The trail 
of railway stations, 


leads through 200 locations 
mountain villages, 


snowy peaks and army camps, all filled 
with the bloody remains of previous 
assassins. The concept of time passing is 


handled nicely, with some events being in 
a different state should you return after 
an overnight sleep. To find and follow the 
clues left for you by your contact, 
involves some code-breaking and neat 
timing, but it's all great fun. The game 
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into the early hours. Highly recommended. 


into the waiting room, and worn steps 
lead down to the street outside. The 


E eeching of freight trains drifts ; ' 
Tn from (Du distance Tur Find This months spell comes from Mark 
nothing. There are visible exits Smith of Rochester and it shows how to 
north, west and down. disguise the true end of yoür program. 
»+ м ы 
Қ ihe GP о URS San The LIST command will halt naturally 
canted mulis darkened by an eae at whenever it encounters the hex characters 
filthy smoke. Cracks in eS decies à &ÜD and &FF. If we insert these at a point 
P aha CR A which looks like a normal end, the casual 
floor polish. The only visible exit user will look no further. 
is south. " 
+ GET POLISH 10 PRINT "MAIN PROG" 
Y bid the t f f1 lish. 28 PROCFRED 
ou in o oor po 
f strange man wearing a mackintosh 30 END<space><space> 
with the collar turned up, a hat and 40 DEFPROCFRED 
@ pair of dark glasses is here! 50 PRINT "MAGIC" 
has nice touches of humour and a very 60 ENDPROC 


professional feel in all of its routines. 

Full sentence commands are accepted, which Type in the above, adding two space 
is a mixed blessing, as there is опе characters (represented as <space><space>) 
occasion when I knew what the answer was, behind the END command at line 30. Now 
but I could not phrase it to the game's find these two spaces (&20, &20) in memory 
Satisfaction. What I should stress is that and change them to &ÜD and &FF (e.g. 
I found the game one of the best I've ?&ElD-&0D  :?&ElE-&FF). The program will 
played for many a month. The problems are continue to work as normal but а LIST 
of average complexity, which made it fun command will halt innocently on line 30. 
rather than a task, and kept me playing 


POINTS ARISING 


TRACKMAN (BEEBUG Vol.4 No.2) 

A mistake during the production of this program resulted in three lines of this 
program appearing incorrectly. Fortunately, these lines only affected the initial 
display of instructions and the score, and did not upset the game itself. We are sorry 
for any confusion that may have arisen over this. The lines should read as follows: 

2700 PRINT"£";TAB(12);LEVEL;TAB(22);L;TAB(26);:IF BL-1 PRINT TIME;SPC(2) ELSE PRINT 
TTG-TIME;CHR$32 

2770 PRINTTAB(8,7)"By Tom and Silas Standage":COLOUR3 

2780 PRINT''" Guide the train(s) safely around the"'" track, until the timer reaches 

zero."'" Then shunt each train back to the"'" station as quickly as possible." 


BEGINNERS START HERE - LOGIC (BEEBUG Vol.4 No.2) 
In one of the small examples оп page 22, the line С=С+ (А=3) should read C=C- (А=3). 


SPREADSHEET PROGRAM (BEEBUG Vol.3 Nos.9 & 10) 

Two small problems have emerged concerning this program. Basic I users should 
replace 'OPENUP' in line 4230 by 'OPENIN'. These both have the same token in Basic, so 
that a program entered with 'OPENUP' using Basic II will then work correctly if used 
with Basic I. Secondly, the test for division by zero does not work correctly if a row 
or column is being divided by a constant. Replace lines 5476 and 5519 as follows: 

5470 IF EVAL ("mat (D1%"+Z1$+",D2%)") AND ZS="/" THEN mat (Al$41$,A2$)-0:GOTO5492 

5510 IF EVAL ("mat (01%,02%"+215+")") AND ZS="/" THEN mat(Al$,A22$*I$)-0:GOTO5530 


CROSS REFERENCER (BEEBUG Vol.3 No,6 and Vol.4 No.1) 
The author of this program has confirmed an error (despite testing) in line 1860 
published in his update to this useful utility. The line should commence: 
1860 UNTIL і$>е]іпе% . . . * 
and not as printed in the update. Thanks to Mr.Coleman for spotting this. =a 
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The BEEB'S Disc Catalogue Revealed 


James Fletcher encourages you to dig into your disc 
catalogue and find a whole mine of information, of 
interest to both new and more experienced disc 
users alike. 


One of the beauties of the BBC micro's 
disc filing system, as far as beginners 
are concerned, is that it is very easy to 
use even if you don't know how it works. 
Just by following a few simple commands 
the user can rapidly load апа save 
programs. How convenient it is, to be able 
to call up ап on-screen catalogue, is one 
of the first things noticed by someone who 
has only previously used cassette. This 
gives details of all the programs on a 
disc merely by typing "*CAT" or even "*.". 


People who use public libraries are 
usually aware that a catalogue of all the 
available books exists, but only if they 
take the trouble to find out how the 
cataloguing system works will they be able 
to use the system to its maximum advantage 
- being able to sort out all the books by 
a particular author or оп a particular 
Subject, for example. In the same way, the 
beginner can straightaway use the Beeb's 
disc catalogue for basic information. 
However, finding out just a little more 
about how the system works will pay big 
dividends by providing a great deal of 
extra information. This can be invaluable 
to the user who is keen to make the most 
of his DFS. This article will help you to 
delve into the 'innards' of the DFS 
catalogue system, and show you how to make 
use of all the information that is 
contained in the first few sectors of the 
floppy disc. 


When you take a new disc out of its 
wrapping, the surface coating is just an 
unstructured jumble of microscopically 
fine iron-oxide particles, and if you try 
putting it into your disc drive and typing 
"*CAT", your computer will try in vain to 
make sense of the noise signals picked up 
by the drive's read/write head. Since 
there are no signals present recognisable 
as computer data, it will eventually give 
up and provide a suitable error message. 
Before you can use the disc for data 
Storage you have to 'format' it, a process 
that records 40 or 80 magnetic concentric 
circles on the disc and provides magnetic 
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marker pulses which divide each of these 
circles into 10 sectors. 


Tracks are numbered from @, оп the 
outside of the disc, to 39 or 79 on the 
inside, depending on whether your drive 
can use 40 or 80 track discs. Sectors are 
numbered from Ü to 9, sometimes shown as 
00 to 09, sector @ occurring shortly after 
the tiny 'index-hole' that you can see 
punched near the centre of the disc. Every 
time the disc rotates the index hole will 
allow light from a light-emitting diode to 
pass through to a photo-detector, and when 
this pulse is detected the disc 
controlling system knows that the head is 
positioned over sector 0, the start of a 
track. Extra magnetic markers are laid 
down during the formatting process to 
identify the first two sectors of the disc 
as the catalogue, and various other synch- 
ronising, addressing and  error-checking 
pulses are also added at this time. 


CATALOGUE. 


Fig.1. Disc layout showing catalogue on sectors 00 and 01 of track 0 


ЕЕ o c P ЖД 


Since it is the first two sectors, 0 
and 1, on track 0 that form the disc 
catalogue, we will take а look at exactly 
how these are made up, and then show how 
to use the information that they contain. 
Like all the other sectors on the disc the 
first two each contain about 300 eight-bit 
bytes (think of a byte as а character), 
some being used for so-called 'house- 
keeping' functions, like synchronising the 
rotation of the disc with the pulses from 
the control chip, for identifying the 


owe 
— sector 


Fig.2. Layout of a typical sector showing 256 bytes of “Useful” data 
plus ‘Housekeeping’ information 


SYNC - Synchronisation information 
CRC - Cyclic Redundancy Check, a checking code 
DATA MARK - Says if data exists or has been deleted 


number of the sector, and for checking 
that no read/write errors have occurred. 
The remaining 256 bytes are available to 
carry useful information, and it 15$ these 
data bytes that we shall concentrate on. 


If you "*CAT" a disc, the screen shows 
something like this : 


TITLEOFDISCS (29) 
Drive: 0 
Directory:0.$ 


Option: 3 (EXEC) 
Library :0.5 


ІВООТ 
COLOURS 
EGGCUP 
FLAG 
PIGLET 
YANKEE 


BEEBUGI 
DREDFUL 
FASTER 
GOODBYE 
RAPIDS 
ZEBRAS 


A.FISHES L B.TESTER 


The top line contains the title of the 
disc, TITLEOFDISCS in our case (set with 
the *TITLE command). Тһе number іп 
brackets following the title is the number 
of times that the disc has been written 
to, and can be useful for tracing which 
version of a program you are using. If a 
disc is re-formatted, this number returns 
to zero. The second line contains the 
drive number, effectively telling you 
which side of the disc you are using, and 
shows which of the various start-up 
options the disc is set for (see page 50 
of the Acorn Disc System User Guide). Our 
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example shows option 3, (which has been 
Set by typing *OPT4,3) and this means 
that with the appropriate !BOOT file on 
the disc, pressing Shift/Break can be made 
to automatically load and run a program 
from the disc. 


The third line of the header shows the 
currently selected directory, set, as in 
our example, to $ (the default directory) 
unless you choose another character (by 
typing *DIR followed by another letter). 
This is followed by the currently selected 
'Library', in our case drive 0 and 
directory $. Machine code programs which 
are contained in the library can be loaded 
and run merely by typing *filename. Then 
follows a complete list of all the files 
on the disc, in alphabetical order. Files 
in the currently set directory ($) are 


listed first, followed by those in other 
directories, in our case 'FISHES' in 
directory 'A' and 'ТЕЗТЕВ' in directory 


'B'. Note that 'FISHES' is followed by a 
letter Г, showing that the file is locked 
against accidental erasure. 


All this catalogue information is 
fitted into the 256 useful bytes of each 
of the first two disc sectors as shown in 
Table 1 overleaf. 


Typing in the short program listed 
at the end will enable you to prove for 
yourself that the catalogue information 
given in the table is correct, and will 
let you see how the first two sectors оп 
any disc are made to contain all the 
cataloque details. 


CODE 
POPUP 


BOB 

40^780DMS$ 

LETTERSB 
B 
B 
B 


B 
B 
GRAPH? В_ 


Line 116 reserves two sections of 
memory. One is called '‘buffer' and is 11 
bytes long, the other is called 'sector' 
and is 256 bytes. Lines 120 to 300 make 
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First eight bytes of 
twelve byte (character) 
disc title. Note that last 
four bytes of title are in 
next sector. 


SDS. Z 52 


на 
1) 5 ее 
SOS IS 
АА 
С 
SUB. eese 
О қан 
BOD 6; 5.0 others 
BOE aie g. aleve 
SUP аль 
ЖЕТЕРІ 
ааа 
КА йа жы 
Заа 
ҚАСЫ > 
C CT 
Iu ce 
ST 555 
&18-BYTE &lE 
SIE Акане а 
&20-BYTE &26 
S27. eren tar? 
sevss CO BYTE &ЕР 


Up to 7 bytes (characters) for 
name of first file on disc. 


uU > =Z m ma tQ Om O m t AHA 


Directory of first file on disc. 


Up to 7 bytes for name of 
second file on disc. 


Xn — ( C UJ m + 


Directory of second file. 

Name of 3rd file (7 characters) 
Directory of 3rd file. 

Name of 4th file. 

Directory of 4th file 

and so on for up to 31 files. 


80122... S 
802:54%..--С 
a dr ыы S 
04-0 


Last four bytes of 
disc title. 


Number of times disc written to. 
Оба exerce 70 8 times No. of catalogue entries. 
бб: ЕЙ Number of sectors on disc (bit 1) 

bit 1 ЦВЕ) 
bit 4 Start-up option (bit 1) 
bit 5 + " (bit-2) 

BYTE -&074 <a. ves Number of sectors on disc 

BYTE &08..... (bits 3 to 8). 

..... to BYTE &0Е Data about first file. Load, 
Execution and Start sector 
addresses plus file length. 

Information about second file, 

as above. 


BYTE 10И еее е9 
.-... tO-BYTE &l7 


Repeated in blocks of eight bytes for up to thirty-one files. 
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use of one of the Beeb's 


built in routines for 
handling disc informa- 
tion. By using this 


OSWORD command (line 290) 
with the accumulator set 
to &7F (line 260) the 
computer is told to per- 
form а read/write opera- 
tion in which it reads 
0 from disc and 
this into the area 
of memory that was 
reserved ав 'sector'. 


In lines 150 to 250 
the parameters for the 
OSWORD call are inserted 
into 'buffer'. А memory 
address offset is used 

so that in line 
for example, we are 
putting information into 
'buffer' one byte from 
the beginning, or in 
other words, into byte 2. 


Note that line 130 
contains the drive 
number, and you can 


change this from 0 to 1, 
2, or 3 if you wish to 
see what is happening on 
your other drives. 


The contents of 'buffer' 
are set as shown: 


Drive number (0). 
Low and high byte 
byte 2 of 16 bit 'sector' 
buffer address. 
byte 3 Extended address 
bytes (both 0). 
byte 5 Number of 
parameters (3). 
byte 6 &53 for READ, or 
&4B for WRITE. 
byte 7 Track number (0). 
byte 8 Sector number (9). 
byte 9 &20 (sector length 
256) * number of 
sectors (1) 


The track and sector 
numbers above are calcu- 
lated from the value of 
S$, initially 0 (see also 
below). 
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Once the disc information is stored 
safely in the computer using the reserved 
memory area 'sector', and in the format 
detailed in Table 1, line 330 starts the 
main program loop and reads bytes out of 
'sector' in groups of eight. Lines 360 to 
390 form another loop, this time printing 
out the information a byte at а time (in 
hexadecimal), and then as a string of 
characters. After sector 0, the whole 
process is repeated for sector 1. The one 
procedure, at the end of the program, 
provides a header for each sector display, 
giving track and sector number. Note that 
you will need to press Shift to scroll 
each pageful of information up the screen. 


After saving the program, running it 
should give you а complete display of the 
contents of the disc catalogue, and armed 
with the information in the first part of 
this article you will be able to browse at 
leisure through all the detail that the 
catalogue contains. You can also alter the 
limits of the loop controlled by 5% (line 
140). This will allow you to look at other 
sectors on any disc. The value of S% can 
range from 0 for the first sector up to a 
maximum of 399 (40 track) or 799 (80 
track). 


10 REM DISC CATALOG PROGRAM 

20 REM Version В1.1 

30 REM Author Neil Slater 

40 REM ВЕЕВОС Aug/Sept 1985 

50 REM Prograa subject to copyright 


100 MODE 7:VDU14 

110 DIM buffer ll,sector 256 
120 osword-&FFFl 

130 drive-0 

140 FOR 5%=0 TO 1 
?buffer-drive 
buffer?l-sector MOD 256 


BASIC LINE ADDRESSES - Dave Brinicombe 
This short function key definition prints 


170 buffer?2-sector DIV 256 
186 buffer?3-0 

buffer?4-0 

buffer?5-3 

buffer?6-&53 

220 buffer?7=S% DIV 19 

230 buffer?8-S$ MOD 16 
buffer?9-&21 

250 buffer?l0-0 

260 A$-&7F 

270 X$-buffer MOD 256 

280 Y$-buffer DIV 256 

290 CALL osword 

IF buffer?l04^»0 THEN PRINT"Error." 


310 PROCprintsector (5%) 
320 PRINT'CHR$129; "Byte" 
330 FOR J$-0 TO 255 STEP 8 
PRINT 'CHRS13@;~ (J% AND 255); 
350 PRINTTAB (5) ;СНВ$1 34; 
360 FOR 1%-0% TO J%+7 
370 BYTE-sector?I$ 
IF BYTE<16 THEN PRINTTAB ( (I$-J$) *3 
+6); "0"; BYTE;" "; ELSE PRINTTAB( (I$-J$) 
*316)5 "BYTE;  '5 
390 NEXT I$ 
400 VDU131 
410 FOR I$-J$ TO J$*7 
420 BYTE-sector?I$ 
430 IF ВҮТЕ>31 AND ВҮТЕ<127 THEN VDU B 
YTE ELSE VDU32 
440 NEXT I%,J% 
PRINT'' 
460 NEXT S% 
470 END 
480 : 
1000 DEF PROCprintsector (5%) 
1010 LOCAL sector$,track$ 
1020 sector$="Sector "+STR$ (5%М0010) 
track$="Track "+STRS (S%DIV19) 
1040 FOR Ү%-0 TO 1 
1050 PRINTTAB (5) ;CHR$141;CHR$157;CHRS$13 
2; track$;SPC4; sector$;SPC2;CHR$156 
1060 NEXT Y$ 
1070 ENDPROC 


"el 


out the start memory address, line 


number, and length of each line of a Basic program. 


*KEYQCLS : @3=6:A=PAGE:P."PAGE "; A:REPEAT Р.А," 


OS EXTINCTION - Dave Brinicombe 


Not exactly a hint, but...the fate of the famous 


line ";256*A?1+A?2,"length 


";А?3: 


species of flightless bird of 


Mauritius is revealed by disassembling the OS ROM from location 0000 (1): 


DODO 20 ED Dl JSR DIED 


=] 
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PLOTMATE 


Plotmate is another recent 
product offering high quality 
graphics output. Geoff Bains has 
been putting the plotter through 
its paces. 


When you have completed your latest 
graphics masterpiece on the screen, there 
is nothing better than a copy on paper to 
show your friends. The only ways of 
achieving hard copy of graphics are either 
to use a printer dump routine with a 
normal dot matrix printer (not the best 
method of displaying a colourful picture) 
or to use a plotter. The latter produces 
excellent results but at a cost of £500 or 
more. Linear Graphics' Plotmate aims to 
change all this. Capable of high quality 
output, the Plotmate is a flatbed A4 
plotter with driving software especially 
for the Beeb, all for £344, 


Plotmate is a very simple piece of 
machinery. Housed in a rugged metal case, 
it comprises a sloping surface to take 
your paper, ап arm that moves across the 
paper (held in place with magnetic 
strips), and а реп holder that moves up 
and down along the arm. The whole thing is 
controlled by two stepper motors with no 
'intelligent' electronics to be found. 


The secret of Plotmate's success is in 
its software. Designed specifically for 
the Beeb, the driving software intercepts 
normal graphics commands (such as PLOT and 
DRAW, and machine code calls to the OS), 
and translates them into control signals 
for the plotter's stepper motors. Even 
commercial packages (such as BEEBUGSOFT's 
Hershey Characters) produce good results. 


This means that using Plotmate is as 
easy as using your BBC micro's screen. 
Once you have written the program to 
produce the picture, graph, or whatever, 
on the screen, the Plotmate software (on 
disc) is used to produce the picture оп 
paper. There is по plotter graphics 
language to learn. 


The Plotmate can only handle one 
colour at a time (it uses standard plotter 
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available from many dealers, or 
direct from Linear Graphics at about £7.50 


pens 


for six). When your program demands a 
change of colour (a VDUI8 or a GCOL 
command) the plotting stops to allow you 
to change the pen - a simple job with the 
bayonet mounting. 


Plotmate can handle characters too. 
Letters appear on the paper differently to 
those on the screen because they are built 
up from lines rather than pixels. Although 
user defined characters cannot be 
reproduced, VDU23 is used to alter the 
orientation of printable characters and 
their size on paper (anything from a few 
millimetres to simply enormous). 


The entire size of the plot can be 
altered and the orientation too. This 
means that although the plotter can only 
handle an A4 sized section at a time, a 
plot up to A2 can be produced by drawing a 
quarter at a time. 


Perhaps the most amazing feat that 
Plotmate can perform is shading. Although 
large areas are filled by drawing a series 
of lines on the paper next to one another, 
the results are very dark and even. This 
really demonstrates the accuracy to which 
Plotmate has been made and is capable of 
being operated. Indeed, its resolution far 
exceeds that of the Beeb's display in any 
mode. Another addition is its ability to 
vary the pattern used to shade areas when 
a PLOT85 type command is used. 


Plotmate 
than £350 it 
plotter. The 


but at less 
a flatbed 
inferior 


is not cheap, 
is cheap for 
results are not 


either. As a plotter for the  Beeb, 
Plotmate is both versatile and 
hardwearing. If you have the cash it is 
recommended. s 


6502 DEVELOPMENT 
PACK 


The long awaited 6502 development pack 
from Acornsoft has at last appeared. Donald 
Morgan brushes the cobwebs off his second 
processor and reports on the package. 


6502 Development Pack produced by 
Acornsoft and priced at £49.85 inc. VAT. 


One of the nice features of the BBC 
micro is its built-in assembler. Although 
quite adequate for the beginner, is this 
assembler really suitable for serious 
program development? A number of 
manufacturers have already given their 
answers to this question in the form of 
stand alone assemblers (for example, see 
VASM review Vol.3 No.1). Now, a year and a 
half after the launch of the 6502 Second 
Processor, Acornsoft have released an 
assembly package, designed specifically 
for the 6502 Second Processor, that takes 
advantage of the extra speed and memory of 
this device. This is the 6502 Development 
Pack, or DevPack for short. 


Individual 
package 


programs within this 
include а truly superb text 
editor, a powerful macro assembler, а 
cryptic debugger (more оп that later), a 
print utility and a cross referencer. To 
run DevPack you will require both a 6502 
Second Processor (at about £200) and a 
disc drive (dual drives are preferable). 
The manual assumes that you already have a 
fair knowledge of 6502 assembler; although 
clear, it would provide hazardous reading 
for the absolute beginner. 

The text editor supplied with the 
DevPack is very powerful. The reference 
card, for example, gives a 7 keystroke 
sequence to reverse alternate characters 
within a document. Not many editors offer 
that degree of flexibility in their search 
and replace options. Control codes (if 
desired) are catered for, with the maximum 
size file being approximately 47k. This is 
а well thought out editor, extremely 
pleasant to use and difficult to fault. 


MASM (Macro ASseMbler) is the main 
program in this package and has been 
written specifically for а 6502 Second 
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Processor. It assembles code very fast 
thanks to efficient buffering using the 
extra memory available. The macros that it 
offers can lead, via macro libraries, to 
the creation of a pseudo high level 
language. Local and global labels, 
conditional assembly, looping and 
recursion, file linking and full macro 
parameter substitution all go to make MASM 
a very powerful assembler. MASM provides 
some good numeric and string manipulation 
operations - credit is due here, as they 
are comprehensive and carefully thought 


out. Unfortunately, MASM does have some 
serious flaws. 
Instead of using the more normal (and 


BBC 'standard') MOS Technology assembler 
mnemonics, MASM uses the obscure Rockwell 
versions. This leads to LDA #4 being 
written as LDAIM 4, for example. The two 
short listings below assemble identical 
code (the first in BBC Basic format and 
the second in MASM) and should serve to 
indicate MASM's approach to key aspects of 


layout, etc. The mnemonics do have one 
advantage - the extra speed that results 
from including addressing information in 


the instruction code. 


6502 


Development Package 


on the BBC Microcomputer with 6502 Second Processor 
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When considering whether you should use 
MASM, one of the main decisions will be 
whether or not you would use these 
mnemonics. Personally, I ам prepared to 
change, but I know a couple of major BBC 
authors who say they would not change over 
to MASM to assemble their programs. 


Another weak point with MASM is the 
restriction on label length - six 
characters! If local labels were not 


available this would have been a pretty 
damning flaw. 


By means of the 'CPU' directive, MASM 
allows the additional CMOS ор-сойеѕ to be 
assembled as well as standard op-codes. 
Although this is a nice feature, there is 


very little available in the way of 
detailed documentation on these new 
op-codes. The otherwise excellent manual 


would have benefitted from the inclusion 
of some extra material to enlighten the 
newcomer to these extensions to the 6502 
instruction set. 


To aid the user in the inevitable 
debugging process, Acorn have included а 
program called Trace, which, to its 
credit, offers most of the facilities that 


one might expect. These include 
'simulation' with range selection, 
breakpoints, memory protection, display, 
editing, etc. The problem with Trace, 


though, is the user interface. Commands 
are all two letter entries with some very 
cryptic derivations. Memory has been 
termed store and disassembly is renamed as 
store interpreting - hence (I think) 'IT' 
is the command for disassembling memory. 
Numbers in Trace are entered in 
hexadecimal (no other base is allowed) but 
are illegal if not preceded by an 
ampersand. I couldn't find а logical 
reason for this and would have thought 
that the ampersand should not have been 
necessary. 


Apart from the cryptic two letter 
commands and the insistence upon a 
preceeding ampersand, my other criticism 
of Trace is that it cannot disassemble 
CMOS op-codes (not mentioned in the 
manual, incidentally). This means that 
Trace is not capable of coping with 
everything that one might assemble with 
MASM. The disassembly process does not 
correctly adjust branches to their final 
destination either, but just prints the 
offset. Neither could I find any way to 
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BBC Basic Assembler Listing 
16 REM Example 


20 DIM CODE 46 
30 oswrch=&FFEE 
40 FOR PASS=@ TO 2 STEP 2 
50 P$-CODE 
60 [OPT PASS 
76 .Start 
80 LDX #32 
90 . loop 
100 ТХА 
110 JSR oswrch 
120 ІМ 
130 CPX #127 
148 BNE loop 
150 ВТ5 
160 ] 
170 NEXT 
MASM Listing 
; > Example 
oswrch * &FFEE 
ORG &2000 
LDXIM 32 
TXA 
JSR 
INX 
CPXIM 127 
BNE loop 
RTS 
END 


start 
loop 
oswrch 


display memory in ASCII. This program is, 
frankly, a disappointment. 


There are some additional utilities 
with the package. The first of these is a 
print program which will generate source 
listings with more extensive formatting 
than is available within the assembler. A 
second version of this program works 
without a second processor attached. There 
is also a cross referencer, again in two 
versions. 


Overall, this is a very powerful 
package (probably the most advanced of its 
kind for the BBC micro), and can be 
recommended if the weak points mentioned 
above are borne in mind. Personally, I 
think the good points in this package out- 
weigh the bad ones, and suggest that all 
serious programmers give every consider- 
ation to this package. SES] 
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BUILDER BOB 


Richard Lewis, author of last 
month's fast moving Hatrace 
game, has dreamed up another 
all-action game. Can you help 
Builder Bob to build his escape 
in this challenging game of 
speed and tactics: 


Bob is trapped on the bottom floor of 
a building that is being demolished. Will 
Bob be able to escape with your guidance 
or will he become just another brick in 
the wall? 

Builder Bob is a fast action one 
player game of skill and strategy, where 
you have to pile up bricks to help Bob 
build his way out of the condemned 
building. This all sounds easy, until you 
meet the workman's crane оп the second 
level which drops odd bricks into the 


SWEET 


rubble, and occas- 
ionally onto Bob's 
head. As Bob is not 
wearing any safety 
gear, a brick on 
the head is quite 
painful and fatal. 


To complete the game, Bob must make 
his way to the top platform without being 


killed three times. There are only two 
ways in which Bob can lose a life. The 
first is by being hit by a brick as 
described above, and the second is if he 
is hit by the crane itself. 
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The keys for playing are included in 
the programs title page. They are as 
follows: 

Z and X move Bob left and right 


respectively, > and ? pick and drop 
bricks from Bobs left or right and 
the space bar makes him jump to take 
or replace a brick from above. 


PROGRAM NOTES 
There are not a lot of procedures in 


this program so we have outlined each one 
below. 


PROCinit Initialise variables 

PROCmanch Define characters for man 

PROCmake Define strings for characters 

PROCman Move and test man 

PROCinst Instructions 

PROCscore Print score sheet 

PROCcrane Position and move crane 

PROCcheck Test for Bob being hit by a 
crane 

PROCcheck2 Test for Bob being hit by a 
brick 

One thing to note about this game is 

that the crane will only appear after you 

have successfully completed the first 

level. After that, the crane will only 


drop bricks between your level and the 

top. 
Please take care when typing this 
program into your 


computer, especial- 
ly with the string 
and character def- 
initions in lines 
1136 to 1446. 
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10 REM PROGRAM BUILDER BOB 

20 REM VERSION В0.3 

30 REM AUTHOR В. LEWIS 

40 REM BEEBUG AUG/SEPT 1985 

50 REM PROGRAM SUBJECT TO COPYRIGHT 


100 ON ERROR GOTO 204 

116 MODE5:VDU23,1,0;0;0;0; :VDU19,3,5,0 
,й,0:0%-0 

120 DIM С$ (6) ,A$300 

130 ?&D0-2:?A$-20:A$-A$*1:A$?147-10:HSC 
$-0:VDU23,1,0;0;0;0; :VDU23,242,0,221 ,221 
,221,0,119,119,119:Е%=0 

140 PROCinst 

150 PROCscore:PROCinit 

160 REPEAT: PROCman: PROCcrane: UNTIL F%> 
4 OR ER$ 

170 FOR I$-1TO4:PROCcrane:NEXT:IF MEN% 
<1 OR F$»4 THEN PROCScOore:MEN$-3:SC$-0 

180 GOTO150 

190 : 

200 ON ERROR OFF 

210 MODE 7:?&D0-0:1F ERR-17 END 

220 REPORT:PRINT " at line ";ERL 

230 END 

240 : 

1000 DEF PROCinit 

1010 CLS:COLOUR3:PRINTTAB (2,1) "НОМЕ SW 
EET НОМЕ"; :COLOUR] : PRINTTAB (6,3) "SCORE 
Be SO eet ma 

1020 COLOURI30:FORJ$-1TO6:FOR I$-0TOl9 
1030 PRINTTAB (I$,J$*5-*1) ; CHR$242; 

1040 К%=1%+1+7%%21+4%:?К%=1:1ІЕ J$-1 THE 
М K$?-21-0:NEXT ELSE NEXT 

1050 K$-J$*21-4A$:?K$-10:NEXT 

1060 COLOUR!28:CP£$-70:BD$-70:TA$-0:ER$-FA 
LSE:BL$-0 

1070 VDU23,243,129,255,129,129,129,255, 
129,129 

1080 VDU23,244,255,255,134,204,1908,690,3 
0,15 

1090 VDU23,245,255,255,97,51,54,60,120, 
240 

1100 М%=0:1М%=0:1В%=0:1Х%=0:Х%=0:1Ү%=0: 
Y$-30-5*F$:V$-20:B$-0: PROCmanch: PROCmake: 
ES=E2S:MS=M25 

1110 ENDPROC 

1120 : 

1130 DEF PROCmanch 
1140 ON 2*M%+IM%+1 GOTO 1150,1160,1170, 
1180,1190,1200,1150,116й0 
50 IF В%=0 THEN VDU23,230,189,189,60, 
36,36,36,100,6:GOTO 1210 ELSE VDU23,230, 
60,60,60,36,36,36,100,6:GOTO 1210 
160 IF B$-0 THEN VDU23,230,189,189,60, 
36,36,36,38,96:GOTOl1210 ELSE VDU23,230,6 
0,60,60,36,36,36,38,96:GOTO1210 
176 VDU23,230,60,60,24,24,28,22,19,50: 
GOTO 1216 


P 


= 


= 
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BUILDER BOB 


"m 
A 


PUT oR TAKE BLOCK 


RETURN TO CONTINUE 


1180 VDU23,230,60,60,24,24,56,232,72,24 
:GOTO 1210 

1198 vDU23,230,60,60,24,24,56,104,200,7 
6:GOTO 1210 

1200 VDU23,230,60,60,24,24,28,23,18,24: 
GOTO 1216 

1210 ON М%+В%+1 GOTO 1220,1230,1240,128 
0,1250,1260,1270,1280 

1220 VDU23,231,60,90,126,60,36,126,255, 
189:GOTO 1280 

1230 VDU23,231,28,6,62,20,28,60,126,189 
:GOTO .1280 

1240 VDU23,231,28,48,62,20,28,60,126,18 
9:GOTO 1280 

1250 VDU23,231,189,219,255,189,165,126, 
60,60:GOTO 1280 

1260 VDU23,231,157,135,191,149,157,126, 
60,60:GOTO 1280 

1276 VDU23,231,157,177,191,149,157,126, 
60,60:GOTO 1280 

1280 ENDPROC 

1290 : 

1300 DEF PROCmake 

1316 M2S-CHR$174CHR$34CHR$2304CHR$84CHR 
$11+CHRS$17+CHR$1+CHR$231 

1320 B$S-CHRS$174CHR$1304CHR$2424CHR$1 74C 
НВ$128 

1330 M3$=M2$+CHR$8+CHR$1 1+В$ 

1340 ElS$-CHR$32 

1350 E2S=CHR$32+CHR$8+CHRS1 | 4CHR$32 
1360 E3$=E2$+CHR$8+CHR$11+CHR$32 

1370 С$ (0) =Е1 $ 

1380 CS (1) =CHRS$245+E1S$ 

1390 C$ (2) =Е1 $+СНВ$245+Е1 $ 

1400 CS (3) =СНВ$244+С$ (2) 

1412 CS (4) =CHRS$244+E1 $+CHRS245 

1420 CS (5) =СНВ$244+Е1 $ 

1430 C$ (6) =СНВ$244 

1440 ENDPROC 

1450 : 

1460 DEF PROCman 

1476 IF IM$-0 THEN IM$-1 ELSE IM%=0 


47 


* 


Е eee eee 


1480 IF Ү%<26-Ғ%%5 THEN Fš=F%+1:IF 10%( 
F%+1)-BL3>9 SC$-SC$450* (F%+1) -5*BLS:COLO 
UR1:PRINTTAB (13,3) ;SC$; 

1490 K%=X3+1+ ( (Y3+4) DIV5) *21+4%:М%=0:С0 
LOURI 

1500 IF NOT(INKEY-104) OR V%<>@ THEN GO 
TO 1530 

1510 М%-1:Н%-К%92-1:4%-?К%-Н%:ІЕ B$-4 АМ 
D Н%<5 THEN B$-0:K$?-1-H$41:PRINTTAB (X$- 
1,Y$*d$) ;B$; TAB (X$, Y$-2) ; E19; : SOUNDI , 1 , 1 
00,6:GOTO 1560 

1520 IF В%=0 AND Н%>1 AND Н%<6 AND (КЗ? 
-21=0 OR ?K%<3) THEN B$-4:K$2-1-H$-1:PRI 
NTTAB (X$-1 , Y$*d$*1) ;E19; :SOUND1,1,100,6: 
GOTO 1560 

1530 IF МОТ(ІМКЕҮ-105) OR \3<>0 THEN GO 
TO 1560 

1540 M$-2:H$-K$2?*1:d$-2?K$-H$:1F В%-4 АМ 
О Н%<5 THEN B$-0:K$?1-2H$41:PRINTTAB (X$41 
, Y$*d$) ;B9; TAB (X$, Y$-2) ; E19; : SOUNDI , 1,10 
0,6:СОТО 1560 

1550 IF В%=0 AND Н%>1 AND Н%<6 AND (K$? 
-21=й OR ?K%<3) THEN B$-4:K$24l-H$-1:PRI 
NTTAB (Х%+1 , Y$4d$41) ;E1$;:SOUND1,1,100,6: 
GOTO 1560 

1560 IF INKEY-67 AND У%-0 THEN ІХ%-1:М% 
22 

1574 IF INKEY-98 AND V$-0 THEN IX$--1:M 
%=1 

1580 IF INKEY-99 AND V%= AND (В%=0 OR 
(B$-4 AND К%?-21-0)) AND IX%= AND ?K$ 3 

THEN У%--?К%:1У%--1:500М01,-15,120,2:00 
TO 1690 

1590 IF V$-0 THEN IY$-0:GOTO 1680 ELSE 
IF У%>0 THEN V$-V$«l:IY$-1:M$-0:SOUNDI,- 
15, (7-V%) *20,4 

1600 IF У%>6-?К% THEN У%-й 

1610 IF У%--1 THEN 1Ү%--1:У%--2:500М01, 
-15,150,2:GOTO1690 

1620 IF V$--3 AND TA$-1 THEN TA$-0:PRIN 
TTAB (X$,Y$-3) ;BS; TAB (X$, Y$-3-K$2-21) ;E1S 


, 

1630 IF V$--3 THEN У%-0:ІЕ ?K$-1 THEN I 
Y3=1 

1640 IF V$--2 AND B$-0 AND К%?-21>0 THE 
М V$--3:IY$-1:B$-4:K$?-21-7 (K$2-21) -1:SOU 
ND1,1,100,5:TA%=1+ ( (К%?-21)=0) :СОТО 1680 

1650 IF V$--2 AND B$-4 THEN У%--3:1Ү%-1 
:B$20:K$?-21721:S0UND1,1,100,5:GOTO 1680 

1660 IF V$--2 THEN У%--3:1Ү%-1:500М01,- 
15,180,5 

1670 IF V$-5 AND B$-4 THEN B$-0:K$?-21- 
1 

1680 IF B$-0 THEN М$=М2$:Е$=Е2$ ELSE M$ 
=M3S:ES=E3S 

1690 PROCmanch:IF IY$-0 AND IX$-0 GOTO 
1768 

1700 IF K$?IX$-0 AND ?K$-1 AND Ү%<26 AN 
D КЗ? (1Х%+21)<5 THEN V$-21:GOTO 1750 
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SCORE SHEET 


so fare е 


MEN LEFT fF R 


RETURN TO CONTTHUE 


1710 IF ?K$-5 AND K$?(IX$-21)-1 THEN D% 
=-1:GOTO 1758 

1720 IF ?K$-1 AND Y%<26 AND К%?1Х%=0 AN 
D K%?(IX%+21)=5 THEN D$-1:GOTO 1750 

1730 IF К%?(1Х%-21)<>0 AND K%?IX%<>10 A 
ND K%?IX3>3-B% DIV4 THEN IX$-0:GOTO 1750 


1740 D$-?K$-K$?IX$:1F ABS (0%) >6 THEN 0% 
=0 ELSE IF ABS (0%) >1 IX$-0:D$-0 

1750 PRINTTAB (X$,Y$) ; ES; 

1760 Y$-Y$41Y$4D$:D$-0:1Y$-0:X$-X$4IX$: 
IX$-0:IF Х%<0 THEN Х%-19:Ү%-Ү%%?К%-К%?19 
+ (K$?19=0) :V%=- (K3?19=0) ELSE IF X%>19 T 
HEN Х%-0:Ү%-Ү%%?К%-К%?-19-(Қ%?-19-0):У%- 
-(K$?-19-0) ELSE GOTO 1780 

1770 IF B$-4 THEN В%=0:М$=М2$:500№0 1,1 
‚100,10 

1780 PRINTTAB (X%,Y%) ;MS; 

1790 ENDPROC 

1800 : 

1810 DEF PROCinst 

1820 CLS:COLOUR3:PRINTTAB (5,2) "BUILDER 
BOB"; 

1830 M$-0:1M$-0:B$-4:PROCmanch: PROCmake 
: PRINTTAB (16, 7)M39$; 

1840 PRINTTAB(1,6)"Use the Bricks"; 

1850 РЕТМТТАВ (0,9) "То build steps home" 


; 
1860 COLOUR2:PRINTTAB (6,12) "MOVE BOB"; 
1870 COLOURI:PRINTTAB(0,15)"Z - LEFT X 


— RIGHT"; 

1884 COLOUR2:PRINTTAB (2,18) "PUT OR TAKE 
BLOCK"; 

1890 COLOURI:PRINTTAB(4,21)". - From LE 


FT";TAB(4,24)"/ - From RIGHT"; 

1900 PRINTTAB(0,27)"SPACE - From ABOVE" 
ГД 

1910 COLOUR3:PRINTTAB (1,30) "RETURN TO C 
ONTINUE"; 

1920 REPEAT UNTIL INKEY-74 

1930 SC$-0:MEN$-3:ENVELOPE 1,1,6,0,-6,2 
00,104,200,100,2,0,-1,120,110 

1940 ЕМОРЕОС 
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1950 : 

1960 DEF PROCscore 

1970 M$-0:B$-0:CLS:COLOUR3:PRINTTAB (4,2 
)"SCORE SHEET"; 

1980 IF МЕМ%<1 OR F%>4 THEN F$-0:COLOUR 
3:PRINTTAB (4,6) "GAME OVER";:GOTO 2020 
1990 PRINTTAB (3,19) "MEN LEFT"; 

2000 РБКІМТТАВ (1,13) "RETURN TO CONTINUE" 


, 

2010 PROCmanch:FOR 1%=1 TO MEN%:PRINTTA 
В(10+2%*1%,10)М25:МЕХТ:СОТО 2050 

2020 PRINTTAB(2,19)"FINAL SCORE ";SC$;: 
IF 5С%>Н5С% THEN HSC$-SC$:COLOUR2:PRINTT 
AB(2,14) "NEW "; 

2030 COLOUR2:PRINTTAB (6,14) "HIGH SCORE" 
; : PRINTTAB (10,16) ;HSC$; 

2040 COLOUR!:PRINTTAB (4,20) "PRESS RETUR 
№; :PRINTTAB (3,22) "FOR A NEW GAME"; :GOTO 

2060 

2050 COLOUR2:PRINTTAB (2,6) "Ѕсоге so far 

a SCt; 

2060 BX$-1:BI$-1:M$-2 

2070 COLOUR! :COLOUR1 30: PRINTTAB (0,31) ; S 
TRINGS (20 ,CHR$242) ; TAB (0, 26) ; STRINGS (3,C 
HR$242) ; TAB (6,26) ; STRINGS (8, CHR$242) ; TAB 
(17,26) ; STRINGS (3,CHR$242) ; 

2080 FORI%=1T04: PRINTTAB (3,26+1%) ; STRIN 
GS (I$, CHR$242) ; TAB (17-13, 26* 1$) ; STRINGS ( 
I$,CHR$242) ; : NEXT: COLOUR] 28 

2090 OBY$-225:0BX$-0 

2100 REPEAT 

EL BX$-BX$4BIS$:IF BX%<@ THEN BX$-0: 

$-1:M$-2 ELSE IF ВХ%>19 THEN BX$-19: aen 
Es М%=1 

2120 BY%=25:IF ВХ%>6 AND BX%<13 THEN BY 
$-30:GOTO 2156 

2130 IF ВХ%>2 AND BX%<7 THEN BY$-23*BX$ 
:GOTO 2150 

2140 IF BX%>12 AND ВХ%<17 THEN BY%=42-B 
X$ 

2150 PRINTTAB (OBX$ , OBY$) E23; : PRINTTAB (B 
X$,BY$)M2$; : OBY$-BY$: OBX3=BX% : FORWS-0TO3 
00:NEXT 

2160 IF IM%=@ THEN IM$-1:1B$-1 ELSE IM$ 
=0:1В%=0 

2170 PROCmanch:UNTIL INKEY-74 

2180 ENDPROC 

2190 : 

2200 DEF PROCcrane 


OO сасар нік сананын аласынан ERN асс 


|| || ITT TT TT TT TTTOƏOGOP,WLW,,HE YESAILIIISIIM&ƏSÍSO@ILLIsI Wa 


2210 IF F$«1 THEN FOR М%-1Т0100:МЕХТ:ЕМ 
DPROC 

2220 IF CP%>25 THEN СР%=СР%-1 : ЕМОРВОС 
2230 IF CP$»0 THEN CP$-CP$-1:GOTO 2250 
ELSE CP$-30:VDU23,244,255,255,134,204,10 
8,60,30,15:VDU23,245,255,255,97,51,54,60 
,120,240 

2240 FL%=5-RND (6-F$):FL$-FL$- (FL$«F$):B 
D%=@:DRS=RND (20)-1:P$-DR$-*l- (6-FL$) *21+А 
$:1F ?P%>3 THEN DR$--6:ENDPROC ELSE BL$- 
BL%+1 : ENDPROC 

2250 IF CP%>22 THEN CRS=CS (CP%-19) :GOTO 
2280 

2260 IF CP%<7 AND CP%>2 THEN CR$-C$ (CP% 
-3):GOTO 2280 

2270 CRS=CS (3) 

2280 IF CP$-DR$*5 THEN VDU23,244,255,25 
5,134,204,120,56,24,12:VDU23,245,255,255 
,97,51,30,28,24,48:BD$-5: PROCcheck2 

2290 IF ?K%>2-B% 01/4 THEN PROCcheck 
2300 ТЕ CP%>5 COLOUR2:PRINTTAB (CP$-6,27 
-FL$*5);CR$;:GOTO 2320 

2310 IF CP%>2 COLOUR2:PRINTTAB (0 , 27-FL$ 
*5) ;CRS; 

2320 IF CP%>4 AND CP%<25 AND CP%>DR%+5 
THEN COLOUR] : PRINTTAB (CP$-5,27-FL$*5) ;BS 


+ 

2330 Q%=CP%-2+(6-FL%)*21+A%:IF CP%>2 AN 
D CP$«23 AND ?Q$-5 THEN COLOURI:PRINTTAB 
(CP$-3,27-FL$*5);B$; 

2340 IF ВО%>?Р%+1 THEN PROCcheck2:BD%=B 
D$-1:COLOURI : PRINTTAB (DR$ , 31 -FL$*5-BD$£) ; 
El $; TAB (DR$,32-FL$*5-BD$);B9;:IF BD$-?P$ 
+1 ?PS=?PS+1 

2350 ENDPROC 

2360 : 

2370 DEF PROCcheck 

2380 IF Х%-СР%-5 AND FL%=6-(Y%+4)DIV5 A 
ND ER$-FALSE THEN ER$-TRUE:MEN$-MEN$-1:3 
C$-SC$ DIV2 

2390 ENDPROC 

2400 : 

2410 DEF PROCcheck2 

2420 IF X$-DR$ AND ER%=FALSE AND ((FL 
7-(¥%+4)DIV5 AND ?К%>3-В% DIV4) OR FL% 
-(Y$4-4)DIV5) THEN ЕВ%=ТВОЕ:МЕМ%=МЕМ%-1 : 
C$-SC$ DIV2 

2430 ENDPROC 


$ 
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HINTS HINTS HINTS HINTS HINTS HINTS 


WORDWISE PLUS AND ADDCOMM CLASH - S.Lazereno 


The on-screen underlining and inverse video features of wordwise Plus will not 


ате if Vine Micro's Addcomm ROM is installed іп a higher priority ROM socke 


WORDWISE PLUS FUNCTION KEYS - C.B.Hill 


From a Wordwise Plus menu, there is no need to use Shift along with a function key 


to access your own definitions, just the function key alone should be pressed. 
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BEEBUG MAGAZINE is produced 
by BEEBUG Publications Ltd. 
Editor: Mike Williams 

Assistant Editor: Geoff Bains 
Production Editor: Phyllida Vanstone 
Technical Assistant: Alan Webster 
Secretary: Debbie Sinfield 
Managing Editor: Lee Calcraft 
Additional thanks are due to 
Sheridan Williams, Adrian Calcraft, 
John Yale and Tim Powys-Lybbe. 
All rights reserved. No part of this 
publication may be reproduced 
without prior written permission of 
the Publisher. The Publisher cannot 
accept any responsibility, whatso- 
ever for errors in articles, programs, 
or advertisements published. The 
opinions expressed on the pages of 
this journal are those of the authors 
and do not necessarily represent 
those of the Publisher, BEEBUG 
Publications Limited. 

BEEBUG Publications Ltd (c) 1985 
Editorial Address 
BEEBUG 
PO BOX 50 
St. Albans 
Herts. 
CONTRIBUTING TO BEEBUG 
PROGRAMS AND ARTICLES 


We are always seeking good quality 
articles and programs for publica- 
tion in BEEBUG. All contributions 
used are paid for at up to £40 per 
page, but please give us warning of 
anything substantial that you 
intend to write. A leaflet, 'Notes 
of Guidance for Contributors' is 
available on receipt of an A5 (or 
larger) SAE. 

In the case of material longer than 
a page, we would prefer this to be 
submitted on cassette or disc in 


machine readable form using 
"Wordwise", “View”, or other 
means, but please ensure an 


adequate written description of 
your contribution is also included. 
If you use cassette, please include a 
backup copy at 300 baud. 


HINTS 


There are prizes of £5 and £10 for 
the best hints each month, plus one 
of £15 for a hint or tip deemed to 
be exceptionally good. 

Please send all editorial material to 
the editorial address below. If you 
require a reply it is essential to 
quote your membership number 
and enclose an SAE. 


O M 
SUBSCRIPTIONS 


Send all applications for membership, subscription renewals, subscription 
queries and orders for back issues to the subscriptions address. 


MEMBERSHIP SUBSCRIPTION RATES 


£ 6.40 6 months (5 issues) UK ONLY 
£11.90 UK - 1 year (10 issues) 


£18 Europe, £21 Middle East 
£23 Americas & Africa, £25 Elsewhere 
BACK ISSUES 


(Members only) 


Please add the cost of post and packing as shown: 


All overseas items are sent airmail (please send a sterling cheque). We will 
accept official UK orders but please note that there will be a £1 handling 
charge for orders under £10 that require an invoice. Note that there is no 
VAT on magazines. 


Back issues are for members only, so it is ESSENTIAL to quote your 
membership number with your order. Please note that the BEEBUG 
Reference Card and BEEBUG supplements are not supplied with back 
issues. 


Subscriptions, Back Issues & 
Software Address 


BEEBUG 
PO BOX 109 
High Wycombe 
Bucks. HP10 8NP 


Hotline for queries and software orders 


St. Albans (0727) 60263 
Manned Mon-Fri 9am-4.30pm 


24hr Answerphone Service for Access and 
Barclaycard orders, and subscriptions 
Penn (049481) 6666 


If you require members’ discount on software it is essential to quote 
your membership number and claim the discount when ordering. 


Se li 


DYN 


Orders for 

10 discs are 
sent in 

black plastic 
library cases. 


Orders for 
50 are 
delivered 
in strong 


with 4 dividers. 


We rearet that we have 
had to pass on a slight 
increase in the price of 
our discs, but we are 


now able to offer a wider 
range to meet your exact 
requirements. 


These discs are the best. 
Please use the enclosed 
order form and order 
from our usual address. 
Beebugsoft, PO Box 109, 
High Wycombe, Bucks. 
HP10 8NP. 


TESTED BY BEEBUG 


AMIC DISCS x 


Fully Guaranteed 


Orders for 
25 are 
delivered 
in strong 
plastic 
Storage 
box 

with 4 dividers. 


0/5 D/D £20.50 


25 с/ 
5/5 р/р £34.99 25 [ys БИ 


50 15/5 D/D. e 


Suitable fo; 
BBC Mi 
including Az ВВС Micro and all 
tari and Commodore ег com, 
imodore. Duters using 5] in, $ 
ch discs 


lise man Not only b, 
ufacturers, V bv Beebug but by one of the UK’ 
$ top 


Official orders are 
welcome. 


Barclaycard and Access 
telephone 0494 81 6666 
Further information 
telephone 0727 60263 


| Magazine Cassette/Disc 


el 9599 
vee 


AUG/SEPT CASSETTE 
DISC CONTENTS 


40/80 DUAL FORMAT UTILITY — provides 64K in both 40 
and 80 track formats on the same disc 

POP-UP CALCULATOR - instant calculations in any program 
including Wordwise | 
DRAWING SIMPLE BAR CHARTS - a useful program in our | 
new series 'First Course | 
ADDING NEW O.S. COMMANDS - with a complete р: Т | 
demonstration of how it's done | 
WORKSHOP PROCEDURES - speeding up calculations with | 
look-up tables 
DISC CATALOGUE DISPLAY - an easily extended program to 

look in detail at your discs 


enthusiast 
EXTRA FEATURE THIS MONTH 


RESCUE MISSION - a very colourful and smooth version of 
this popular style game to rescue the human survivors in а 


| 

BUILDER BOB - challenging fast action for the games У | HNN | 
I Í i 

| 

: 

1 

hazardous mission | 


DISASSEMBLER - for second processor users this е | 
disassembles the full instruction set of the 65C02 processor | 
and follows the Extended 65C02 Assembler published in ) f 
BEEBUG Vol. 4 No. 1. 


All this for £3.00 (cass) £4.75 (disc) +50p p&p. 
Back issues (disc since Vol. 3 No. 1, cass since Vol. 1 No. 10) available at the 
same prices. 


Subscription rates DISC CASS DISC CASS 
UK UK O’seas O'seas 

6 months (5 issues) £25 £17 £30 £20 

12 months (10 issues) £50 £33 £56 £39 


Prices are inclusive of VAT and postage as applicable. Sterling only please. 


Cassette subscriptions can be commuted to disc subscription on receipt of 
£1.70 per issue of the subscription left to run. 


All subscription and individual orders to 
BEEBUGSOFT, PO BOX 109, High Wycombe, Bucks, HP10 8NP. 
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EPROM PROGRAMMER PROJECT 


Due to a hitch at the printers the main constructional 


diagram for this project, on page 21 of this issue, 


has 


unfortunately been printed incorrectly with essential 
information missing. The complete, and correct, version of 


this is reproduced in enlarged form below. Our thanks to 
printers for speedily reprinting this diagram. 
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